Ver Mensaje Individual
  #4  
Antiguo 25-02-2007
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 25
Delphius Va camino a la fama
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,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita