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




Вниз

Help! 


WithoutHead   (2001-11-27 19:09) [0]

НИкогда не писал на ВинАпи так что прошу не удивлятся...
Пытаюсь послать проге сообщение нажатия клавиши "c"
Делаю так:
SendMessage( hWndHandle,
WM_KEYDOWN,
VkKeyScan("c"),
0 );
Прога никак не реагирует, в чем дело?



Иван Шихалев   (2001-11-27 19:32) [1]

А как насчет WM_KEYUP?



WithoutHead   (2001-11-27 20:26) [2]

А что такое WM_KEYUP?
WM_KEYDOWN когда нажимаю, а WM_KEYUP когда отпускаю кнопку что-ли?
Так зачем тогда WM_KEYUP?



Иван Шихалев   (2001-11-27 20:33) [3]

А чтоб WM_KEYPRESS ушло :)



WithoutHead   (2001-11-27 20:45) [4]

Теперь понял, но все равно не получается :(
Может вторым параметром надо что-то посылать?
Типа
SendMessage( hWndHandle,
WM_KEYUP,
VkKeyScan("c"),
чего-то там... );



Mr. API   (2001-11-28 12:21) [5]

Может WM_CHAR?



marconi   (2001-11-28 13:44) [6]



PostMessage(FindWindow("Tform1",nil),WM_CHAR,ord("c"),0);



WithoutHead   (2001-11-28 16:54) [7]

WM_CHAR не работает.

SendMessage( FindWindow( PChar("Winamp v1.x"),nil ),
WM_KEYDOWN,
VkKeyScan("c"),
3145729 );
SendMessage( FindWindow( PChar("Winamp v1.x"),nil ),
WM_KEYUP,
VkKeyScan("c"),
-2143092735 );

Пишу вот так все работает, но только для ВинАмп-а. У меня есть плеер: CoolPlayer , ему посылаю тоже самое, только
FindWindow( "CoolPlayer", nil );
и не работает... в чем дело? Если кому интересно могу послать на мыло сам CoolPlayer он 213 Кб в архиве занимает...



marconi   (2001-11-29 09:57) [8]

PostMessage



WithoutHead   (2001-11-29 18:26) [9]

2marconi:
Спасибо большое, все получилось....
Усли не в лом может объяснит, кто чем Send от PostMessage отличается




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




Наверх





Память: 0.72 MB
Время: 0.014 c
4-90409           Dimbambon             2001-11-24 22:51  2002.01.28  
КАК СДЕЛАТЬ, ЧТО БЫ ПРИ ЗАПУСКЕ МОЯ ПРОГРАММА В Labele ОТОБРАЖАЛА ПРОИЗВОЛЬНОЕ ЧИСЛО?


1-90290           Delphimun             2002-01-07 12:11  2002.01.28  
Как найти в заданном тексте, сочетания символов, которые подходят заданной схеме?


3-90196           Тонио-Лунатик         2001-12-21 17:34  2002.01.28  
TIBQuery?


6-90333           borjomez              2001-11-06 13:44  2002.01.28  
TServerSocket


14-90352          Brand                 2001-11-30 23:35  2002.01.28  
Кодирование информации