Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2005.11.27;
Скачать: [xml.tar.bz2];

Вниз

Keybd_Event не хочет нажимать на "точку"   Найти похожие ветки 

 
Реактор ©   (2005-09-24 16:17) [0]

Загадка. Элементарная казалось бы задача, дано  число (Quote1)которое иммет вид 1.****
Надо симитировать нажатие на клавиатуре, соответствующее набору этого числа.

Вот код

Keybd_Event( 49, 0, 0, 0 );
 Keybd_Event( 49, 0, KEYEVENTF_KEYUP, 0 );
 Keybd_Event( 190, 0, 0, 0 );
 Keybd_Event( 190, 0, KEYEVENTF_KEYUP, 0 );
 Keybd_Event( Quote1 mod 10000 div 1000 + 48, 0, 0, 0 );
 Keybd_Event( Quote1 mod 10000 div 1000 + 48, 0, KEYEVENTF_KEYUP, 0 );
 Keybd_Event( Quote1 mod 1000 div 100 + 48, 0, 0, 0 );
 Keybd_Event( Quote1 mod 1000 div 100 + 48, 0, KEYEVENTF_KEYUP, 0 );
 Keybd_Event( Quote1 mod 100 div 10 + 48, 0, 0, 0 );
 Keybd_Event( Quote1 mod 100 div 10 + 48, 0, KEYEVENTF_KEYUP, 0 );
 Keybd_Event( Quote1 mod 10 + 48, 0, 0, 0 );
 Keybd_Event( Quote1 mod 10 + 48, 0, KEYEVENTF_KEYUP, 0 );


Вроде бы элементарно, но не работает. Если убрать две строки кода, где нажимается точка, то все цифры печатаются без проблем. А с двумя строками, где имитируется нажатие клавиши "точка", почему-то печатаются после точки две цифры, а потом раздается "колокольчик", как буд-то буфер клавиатуры переполнен. В чем может быть причина?


 
Реактор ©   (2005-09-24 16:30) [1]

Извините за беспокойство. Сам нашел.



Страницы: 1 вся ветка

Форум: "WinAPI";
Текущий архив: 2005.11.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.014 c
2-1131362220
Compressor
2005-11-07 14:17
2005.11.27
Из Char в Integer.


1-1130837427
kyn66
2005-11-01 12:30
2005.11.27
Анимация виснет во время процесса.


2-1131813261
Катерина
2005-11-12 19:34
2005.11.27
Как очистить строки (s1,s2:string)?


8-1120636507
DelphiN!
2005-07-06 11:55
2005.11.27
Изменение громкости звука в Windows, на драйверах Audigy2 zs


6-1123746571
slotti
2005-08-11 11:49
2005.11.27
Скачивание файла с интернета





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский