Информатика. Программирование в Delphi
249
Рис. 22.8
Рис. 22.9
//выполняется при создании формы
procedure TForm1.FormCreate(Sender: TObject);
begin
//запрет работы таймера
Timer1.Enabled:=false;
//интервал работы таймера
Timer1.Interval:=1000;
//Tag=0 форма выводится на экран
//Tag=1 форма скрыта
Timer1.Tag:=0;
//стиль границ формы
I...,239,240,241,242,243,244,245,246,247,248 250,251,252,253,254,255,256,257,258,259,...370