Home

Page 190
Page 190
background image

Простые приемы работы с сетью

Листинг 4.5.

program Internat32;

uses

 in

 {Forml);

var

begin

 true, false,

while (true) do

begin

 1000);

end;

end.

Будьте внимательны при переписывании. Все должно быть один к одному.

Теперь я расскажу, что здесь написано. В самом начале нет ничего интерес-

ного, и оно нас абсолютно не касается. Нас интересует только то, что напи-

сано после слова var.

 — этим говорится, что мне нужен указатель

 на

 СОбЫТИе

  i n i t i a l i z e — инициализируется программа.

 — устанавливаются пара-

метры окна. Параметр

 говорит, что окно должно быть невидимо.

Единственное, как его можно после этого увидеть — нажать

<Ctrl>+<Alt>+<Del>. Но здесь у нас используется не вызывающее

дозрения (только у чайника, профи уже давно знают о таком имени) имя.

 — создается форма. Приходится это делать

так, потому что мы в самом начале убрали форму из списка автосозда-

ваемых.


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

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