Информатика. Программирование в 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;
//стиль границ формы