Como usar el Timer

[__cadetill]

Tienes que programarle el evento OnTimer, asignarle a la propiedad Interval el tiempo en milisegundos cada cuándo quieres que se dispare y activarlo mediante la propiedad Enabled

procedure TForm1.ActivaTimerClick(Sendet: TObject);
begin
  Timer1.Interval := 1000;
  Timer1.Enabled := true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ShowMessage('esto se dispara cada segundo');
end;