Einzelnen Beitrag anzeigen

SvB

Registriert seit: 21. Okt 2004
Ort: Eckenroth
426 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#5

Re: Möglichkeit um Threads zu reseten ?

  Alt 20. Jul 2008, 09:34
Hi,

Ich würde das ganze so machen:
Delphi-Quellcode:
procedure TAsdThread.Execute;
begin
  while not Terminated do begin
    proc1(parameter);
    proc2(parameter);
    if func3(parameter) then Continue;
    proc4(parameter);
    break;
  end;
end;
// Delphi Hilfe:
// Continue = Setzt die Programmausführung mit dem nächsten Durchlauf einer for-, while- oder repeat-Schleife fort.
// Break = Verlässt eine for-, while- oder repeat-Schleife.
Ich denke, so ist es noch eleganter gelöst.

Grüße Sven
  Mit Zitat antworten Zitat