Thema: Delphi Einem Thread Zeit geben

Einzelnen Beitrag anzeigen

easywk

Registriert seit: 9. Jul 2003
Ort: Schwanewede
117 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Einem Thread Zeit geben

  Alt 8. Jun 2006, 18:56
Hi.

Wenn du das leeren und Befüllen eh schon mit einer Semaphore geschützt hast, kann du dir an der Stelle doch einen Merker setzen, dass geändert worden ist. Der Thread setzt diesen Merker zurück, wenn er anfängt zu arbeiten und fragt ihn vor jedem Schleifenzugriff ab. Sitzt der Merker wieder, schießt sich der Thread selber ab ...

Delphi-Quellcode:
procedure TXXXThread.Execute;
begin
   Geaendert:=FALSE;
   for i:=0 to liste.Count-1 do
   begin
      if Geaendert then Exit;
      BearbeiteListenElement(i);
   end;
end;
cu
easywk
Björn
if all else fails - read the instructions
  Mit Zitat antworten Zitat