Определяем нажатие определенной клавиши во время загрузки приложения в Delphi

Используйте WinAPI функцию GetKeyState() для определения нажатия клавиши в тексте проекта.

Пример:

program Project1; 
 
uses
  Windows, 
  Forms, 
  Unit1 in 'Unit1.pas' {Form1}; 
  
{$R *.RES}
  
begin
  if GetKeyState(vk_F8) < 1 then
    MessageBox(0, 'F8 was pressed during startup', 'MyApp', mb_ok); 
  Application.Initialize; 
  Application.CreateForm(TForm1, Form1); 
  Application.Run; 
end. 
Kwork.ru - услуги фрилансеров от 500 руб.
1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (10 оценок, среднее: 5,00 из 5)
Загрузка...
Добавить комментарий