Veamos... el ejemplo más sencillo que se me ocurre:
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
timer1.Interval := 3000;
timer1.Enabled := true;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
ShowMessage('Este cartel aparece tras pasar 3 seg');
timer1.Enabled := False;
end;
Espero que te sirva.
Saludos,