Delphi Überwachung von Variablen in einem Thread

Thema durchsuchen

Ansicht

Themen-Optionen

Überwachung von Variablen in einem Thread

Ein Thema von LokutusvB · begonnen am 5. Sep 2006 · letzter Beitrag vom 5. Sep 2006

Vorheriger Beitrag

Nächster Beitrag

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge

Delphi 5 Professional

Re: Überwachung von Variablen in einem Thread

5. Sep 2006, 17:20

Der Thread arbeitet ja wohl in einer Schleife.
Dann kann er sich doch selbst "neu starten"

zusammenfalten · markieren

Delphi-Quellcode:

			Label Anfang;

begin

Anfang:

  Initialisierung;  // falls nötig Startwerte setzen

  FLastTime := Now;

  while not Terminated do

  begin

    x := RufeFunktion;

    if x <> 1 then

       FLastTime := Now

    else if (Now-FLastTime)*24.0*60.0*60.0 > 10.0 then

       goto Anfang;

  end;

end;