Home

Page 31
Page 31
background image

24 Глава 1

следующее (комментарии, строки текста, которые идут после символов //,

естественно, можно опускать):

uses

windows, messages, sysutils;

f$R *.RES}

var

Instance: HWnd;

Handle: HWnd;

//Процедура выхода из программы

procedure DoExit;
begin

end;

 обработки событий Windows

function WindowProc

 longint): longint;

begin

if

 then

DoExit;

if

 then

if

 then

poExit;

end;

//Отсюда начинается выполнение программы

begin

//Получаем описатель модуля

instance


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.