Используйту WinAPI функцию GetKeyState() для определения нажатия клавиши в тексте проекта. Для того чтобы увидеть текст файла проекта в главном меню Delphi 3 выберите "View">>"ProjectSource" в Delphi 4 "Project">>"View Source".

 

Code:

            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.

 

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!


Защитный код
Обновить