короче задаю вопрос по другому :
как послать нажатие клавиши НЕ АКТИВНОМУ окну зная его hwnd и заголовок
???вот такая фича, закрыть это окно я могу , а вот эмулировать нажатие F1 не получается,
че я неправильно делаю
? мне надо чтоб в НЕ АКТИВНОМ окне (игра)
по таймеру нажимались клавиши(F1, F2, ...)
может вообше можно как то по другому
? короче обязательно надо, чтоб нажатие клавишь ловило НЕ АКТИВНОЕ окно.
это для игры Ультима Онлайн, там на клавиши можно написать
макрос и нажимая клавишу будет выполняться действие,
но это занимает комп,
я видел для нее самопальные проги,
которые жмут клавиши в неактивном окне игры,
но они хреново написаны и слишком тормозят комп...
'------------------------------------------
Private Declare Function FindWindow Lib "user32" _
Alias "FindWindowA" (ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" _
Alias "PostMessageA" (ByVal hwnd As Long, _
ByVal wMsg As Long, ByVal wParam As Long, _
ByVal lParam As Long) As Long
'''''''''Const VK_F1 = &H70
'''''''''Const WM_QUIT = &H12
Dim hW As Long
'----------------------------------------------
Private Sub tim1_Timer()
hW = FindWindow(vbNullString, "Безымянный - Блокнот" & Chr(0))
Call PostMessage(hW, &H12, 0, 0) 'работает блокнот закрывается !!!!!
''' Call PostMessage(hW, &H70, 0, 0) 'НЕ РАБОТАЕТ !!!!!
Но это уже вопрос не для этого форума.