таймер в делфи

[angelap]

как сделать таймер чтобы прога автомотически срабатывала после 20 минут.

[NewLamer&Programer]

procedure TForm1.Timer1Timer(Sender: TObject); //Timer1.Interval = 60000
begin
Timer1.Tag:= Timer1.Tag + 1;
if (Timer1.Tag = 20) then ShowMessage('!!!');
end;

[angelap]

у меня три копки как сделать чтоб они сработали по таймеру??

[Вадим Мошев]

Что вы имеете в виду по фразой "сработали кнопки"?

[NewLamer&Programer]

Button1.Click;
Button2.Click;
Button3.Click;

[Stilet]

procedure TForm1.Timer1Timer(Sender: TObject); //Timer1.Interval = 60000
begin
 Button1.Click;Button2.Click;Button3.Click;
end;

[angelap]

все заработало Спасибо!!