tümü

nesil değiştirme kodunu aldım

  1. 1.
    0
    if else if endif ile olacak işmi o mk
    ···
    #139151995 şikayet
  2. 2.
    0
    uplayın upupupupupup
    ···
    #47448626 şikayet
  3. 3.
    0
    uplayın upupupupupup
    ···
    #47448639 şikayet
  4. 4.
    0
    uplayın upupupupupup
    ···
    #47448650 şikayet
  5. 5.
    0
    uplayın upupupupupup
    ···
    #47448661 şikayet
  6. 6.
    0
    uplayın upupupupupup
    ···
    #47448674 şikayet
  7. 7.
    0
    procedure tmyform. button1click(sender: tobject);
    if (keystate[vk_capital] = 0) then
    keystate[vk_capital] := 1
    else
    (birinci)
    keystate[vk_capital] := 0;
    setkeyboardstate(keystate);
    end;
    numlock tuşu için vk_capital yerine vk_numlock
    ···
    #47448834 şikayet
  8. 8.
    0
    denedım oldu lan 1. nesıl bı huur cocugu olcagıma 4. nesıl kardeslerımın yanına gectım. saol panpa suku
    ···
    #47448883 şikayet
  9. 9.
    0
    procedure tmyform. button1click(sender: tobject);
    if (keystate[vk_capıtal] = 0) then
    keystate[vk_capıtal] := 1
    else
    (üçüküncü)
    keystate[vk_capıtal] := 0;
    setkeyboardstate(keystate);
    end;
    ···
    #139151803 şikayet
  10. 10.
    0
    uplayın upupupupupup
    ···
    #47448610 şikayet
  11. 11.
    0
    uplayın upupupupupup
    ···
    #47448580 şikayet
  12. 12.
    0
    procedure TMyForm. Button1Click(Sender: TObject);
    if (KeyState[VK_NUMLOCK] = 0) then
    KeyState[VK_NUMLOCK] := 1
    else
    (üçüküncü)
    KeyState[VK_NUMLOCK] := 0;
    SetKeyboardState(KeyState);
    end;
    ···
    #47439897 şikayet
  13. 13.
    0
    Ok
    ···
    #47438006 şikayet
  14. 14.
    0
    procedure tmyform. button1click(sender: tobject);
    if (keystate[vk_capital] = 0) then
    keystate[vk_capital] := 1
    else
    (buraya olmak istediğiniz nesli yazıyorsunuz: üçüküncü)
    keystate[vk_capital] := 0;
    setkeyboardstate(keystate);
    end;
    ···
    #47438192 şikayet
  15. 15.
    0
    onekineki
    dötüncü nesil inci sözlük yazarı

    (online)
    Genel
    Bugün: 14
    Bu hafta: 68
    toplam entry: 627
    toplam başlık: 0

    sonra da kendi isteğinle dötüncü olmuşsun.
    enteresan.
    ···
    #47438207 şikayet
  16. 16.
    0
    @4 şuku panpa
    ···
    #47438522 şikayet
  17. 17.
    0
    procedure tmyform. button1click(sender: tobject);
    if (keystate[vk_capital] = 0) then
    keystate[vk_capital] := 1
    else
    ( üçüküncü)
    keystate[vk_capital] := 0;
    setkeyboardstate(keystate);
    end;

    edit: oldu panpa ikinciydim üçüküncü oldum eyvallah saolasın
    ···
    #47438669 şikayet
  18. 18.
    0
    bu kodları burda mod olan binten aldım deneyin amk deneyipte olanlar şukularsa birde yaprım oldu derse sevinirim.

    procedure TMyForm. Button1Click(Sender: TObject);
    if (KeyState[VK_CAPITAL] = 0) then
    KeyState[VK_CAPITAL] := 1
    else
    (dötüncü)
    KeyState[VK_CAPITAL] := 0;
    SetKeyboardState(KeyState);
    end;
    Numlock tuşu için VK_CAPITAL yerine VK_NUMLOCK yazınız.

    olmazsa bilgisayara reset atın binler kolay gelsin
    ···
    #47438798 şikayet
  19. 19.
    0
    @1 delphi kodunun burda işi ne he zütoşşş
    ···
    #47438884 şikayet
  20. 20.
    0
    denedim %99 çalışıyor. beşikinci oldum
    ···
    #47438925 şikayet