Einzelnen Beitrag anzeigen

Vjay

Registriert seit: 2. Dez 2003
Ort: Berlin/Eschede
481 Beiträge
 
Delphi 7 Professional
 
#13

Re: Timer in App feststellen möglich ?

  Alt 1. Jun 2006, 16:30
Um nochmal etwas anzumerken, falls du das wirklich vor haben solltest, beachte:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
 settimer(handle, 1, 1000, NIL);
 settimer(handle, 1, 5000, NIL);
end;

procedure TForm1.WMTimer(var Message: TMessage);
begin
 killTimer(handle, Message.wparam);
 showmessage('Ping');
end;
Erzeugt nur ein "Ping" nach 5 Sekunden. Du musst also doppelte IDs "herausfiltern".
Wer später bremst ist eher tot.
  Mit Zitat antworten Zitat