Home

Page 83
Page 83
background image

76 Глава 3

Wnd

 wParam;

 windtext, 255);

 '+++'+

 (f);

CloseFile{f);

end;

//Окно уничтожено

begin

Wnd

 wParam;

if Wnd<>0 then

 windtext, 255);

if

 then exit;

if Str='' then exit;

 255);

 Filedir);

if not

 then

begin

Rewrite (f) ;

 ;

end;

if

 then

Writelnff,

 Date+Time)+


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

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