Нажатие клавиши F11

[sashaxD]

Нужен исходник программы которая нажимает и отпускает клавишу F11 желательно в любом окне. Я новичок, не ругайте.
За ранее спасибо.

[Swarog]

работает ил нет на знаю просто нашел пример

К сожалению работает хорошо, только когда фокус у вызывающего окна, в противном случае может глючить

procedure TForm1.SetKey(Key:Integer);
begin
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY,0);
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
end;

Применение

SetKey(VK_SCROLL);
SetKey(VK_CAPITAL);

[sashaxD]

В гугле я все попробовал вроде.
Ошибку показывает в строчке procedure TForm1.SetKey(Key:Integer);
Когда запускаю билд.

[Человек_Борща]

АП & ДАУН.

Текст ошибки в студию.

[raxp]

Когда запускаю билд.

это еще какой билд?

[fate]

sashaxD используй winapi функцию SendInput

[sashaxD]

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

sashaxD используй winapi функцию SendInput

Это вроде для С++ , а мне надо на делфи.

Сообщение от Человек_Борща

.

Текст ошибки в студию.

Undeclared indentifier SetKey
Undeclared indentifier Key

[Stilet]

а мне надо на делфи.

А ее и в Делфи можно использовать:
http://www.programmersforum.ru/showt...t=18011&page=2

[sashaxD]

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

А ее и в Делфи можно использовать:
http://www.programmersforum.ru/showt...t=18011&page=2

Не работает ((( Можете просто дать исходник такой программы?