Вопрос про таймер

[artbotva]

Всем доброго времени суток!
Такой вопрос, мне нужно чтобы моё приложение передавало во внешнее приложение команды. Должно быть такого вида:
1.Приложение найдено
2.Нажимаем клавишу "A"
3.Отпускаем клавишу "A"
4.Нажимаем ENTER
5.Отпускаем ENTER
6.Нажимаем клавишу "B"
7.Отпускаем клавишу "B"
8.Нажимаем ENTER
9.Отпускаем ENTER

Самое интересное: пункты 1234 приложение выполняет, а потом глохнет. Таймер ставлю на 12 сек.

Заранее спасибо!

procedure TForm1.Timer2Timer(Sender: TObject);
var
    h : thandle;
begin
    h := findwindow(nil, 'Notebook');
       keybd_event(h, 83, 0, 0);
       Sleep(1000);
    keybd_event(h, 83, 0, KEYEVENTF_KEYUP);
    Sleep(1000);
     keybd_event(h, VK_RETURN, 0, 0);
     Sleep(1000);
    keybd_event(h, VK_RETURN, 0, KEYEVENTF_KEYUP);
    Sleep(1000);
    keybd_event(h, 84, 0, 0);
    Sleep(1000);
    keybd_event(h, 84, 0, KEYEVENTF_KEYUP);
    Sleep(1000);
     keybd_event(h, VK_RETURN, 0, 0);
     Sleep(1000);
    keybd_event(h, VK_RETURN, 0, KEYEVENTF_KEYUP);
    Sleep(1000);
end;

[Alex11223]

А таймер причем тут?

Смотрите документацию, порядок параметров не тот же https://msdn.microsoft.com/en-us/lib...or=-2147217396

[artbotva]

Сообщение от Alex11223

А таймер причем тут?

Мне нужно чтобы моя программа проверяла наличие открытой программы Notebook, и когда она будет запущена проводить эти действия.

Посмотрел документацию

keybd_event( VK_NUMLOCK,
                      0x45,
                      KEYEVENTF_EXTENDEDKEY | 0,
                      0 );

      // Simulate a key release
         keybd_event( VK_NUMLOCK,
                      0x45,
                      KEYEVENTF_EXTENDEDKEY | KEYEVENTF_KEYUP,
                      0);

Вроде порядок такой же как и у меня, нажал-отпустил. Задержку я чуть позже дописал, от безысходности...

[Alex11223]

Так а таймер-то причем если вопрос на самом деле не о нем? Думаете в обработчике клика кнопки или вообще в консольном приложении этот код будет работать по-другому?

[Alex11223]

Сообщение от artbotva

Вроде порядок такой же как и у меня, нажал-отпустил

порядок параметров, а не вызовов.

[artbotva]

Сообщение от Alex11223

порядок параметров, а не вызовов.

Блин, вот не вижу я где ошибка, может тыкнете пальцем?

[Alex11223]

Читайте какой параметр что делает и смотрите что у вас.

А handle оно вообще не принимает же.