Форум АНТИЧАТ - Показать сообщение отдельно

Цитата:

Сообщение от slesh

примерно так: в онклике буттона пропиши

Код:

ProgressBar1.max := 100;
ProgressBar1.Position := 100;
Timer1.enable := true;

настрой таймер на нужную частоту и пропиши код
в онтаймер таймера

Код:

 ProgressBar1.Position := ProgressBar1.Position + 1;
 if ProgressBar1.Position = ProgressBar1.max then
 begin
   Timer1.Enable := false;
   Form2.Show();
 end;

огромное спасибо) ток одно но нет своиства enable есть
enabled