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

Билл Гейтс собирает правление Майкрософт.
- в прошлом году мы продали 1 миллион копий Виндоус...
- хакеры сломали.
- в этом году мы продали 2 миллиона копий.
- хакеры сломали.
- в следующем году мы продадим 5 миллионов копий...
- и пусть у этих хакеров клавиатура треснет!

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.

Недавно добавленные исходники
• TDictionary Custom Sort 1 843 • Fast Watermark Sources 1 877 • 3D Designer 3 298 • Sik Screen Capture 2 296 • Patch Maker 2 473 • Айболит (remote control) 2 295 • ListBox Drag & Drop 1 894 • Доска для игры Реверси 69 591 • Графические эффекты 2 493 • Рисование по маске 2 030 • Перетаскивание изображений 1 591 • Canvas Drawing 1 591 • Рисование Луны 1 608 • Поворот изображения 1 224 • Рисование стержней 1 276 • Paint on Shape 910 • Генератор кроссвордов 1 423 • Головоломка Paletto 1 106 • Теорема Монжа об окружностях 1 451 • Пазл Numbrix 1 028 • Заборы и коммивояжеры 1 303 • Игра HIP 866 • Игра Go (Го) 830 • Симулятор лифта 966 • Программа укладки плитки 804 • Генератор лабиринта 966 • Проверка числового ввода 866 • HEX View 999 • Физический маятник 869 • Задача коммивояжера 920