Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#17

Re: Laufschrift hängt

  Alt 16. Sep 2007, 20:29
doch, wer sollte dich davon abhalten im OnTimer einen Thread zu erzeugen? Allerdings ist es quatsch.
Du kannst auch einfach im Thread ständig prüfen ob es wieder zeit ist:
Delphi-Quellcode:
llastRun := GetTickCount;
repeat
  lTime := GetTickCount();
  if (llastRun + 5000 < lTime) then
  begin
    //DoWhatYouWant (load picture and syncronize to show it)
    llastRun := lTime;
  end;
  sleep(50); //um die CPU-Last gering zu halten, wir müssen ja die Schelife nicht übermäßig oft durchlaufen
until Self.Terminated;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat