[Delphi]/[Pascal] Задай вопрос, получи ответ

#11

30.12.2009, 19:49

slesh

Познавший АНТИЧАТ

Регистрация: 05.03.2007

Сообщений: 1,985

С нами: 10097606

Репутация: 3349

в твоем случае нужно коды переводить данные из обычного кода в виртуальный.
для этого есть функция VkKeyScan. Но при её юзанье ты потеряеш регистр букв. т.е. все будет маленькими или большими, взависимости от шифта.

В твоем случае это так:
keybd_event(VkKeyScan(edit1.Text[x]), 0, 0, 0);

VkKeyScan возвращает в младшей части - код.
А в старшей - инфу о кнопках

Цитата:

If the function succeeds, the low-order byte of the return value contains the virtual-key code and the high-order byte contains the shift state, which can be a combination of the following flag bits.

If the function finds no key that translates to the passed character code, both the low-order and high-order bytes contain –1.

Bit Meaning
1 Either SHIFT key is pressed.
2 Either CTRL key is pressed.
4 Either ALT key is pressed.
8 The Hankaku key is pressed
16 Reserved (defined by the keyboard layout driver).
32 Reserved (defined by the keyboard layout driver).

-------------------
d делфи числа в шестнадчатиричной системе пишутся через $ типа
$A1

Последний раз редактировалось slesh; 30.12.2009 в 19:53..