como hacer un cronometro

[[Delphius]]

Veamos... el ejemplo más sencillo que se me ocurre:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  // quiero que a los 3 segundos... se ejecute
  // el código
  timer1.Interval := 3000;
  // lo habilito...
  timer1.Enabled := true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ShowMessage('Este cartel aparece tras pasar 3 seg');
  // si quieres que se detenga una vez
  // ejecutado... pones enabled en false
  // si quieres que se ejecute cada x segundos
  // tiene que eser true
  timer1.Enabled := False;
  // pon aqui lo que quieras hacer
end;

Espero que te sirva.
Saludos,