Листинг 2.3.
Элементарное приложение
program WinAPI;
uses
Windows, Messages;
{$R *.res}
begin
MessageBox(0, \'This is a test\', \'Little application\', MB_OK);
end.
Зачастую неоправданно полностью отказываться от классов, реализованных Borland. Но для чистоты эксперимента в этой главе рассмотрим радикальные примеры, построенные на использовании только Windows API.