Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
Delphi 12 Athens
|
Re: Prüfen ob TStrings gerade geupdated wird
8. Feb 2010, 12:22
Delphi-Quellcode:
While true Do
Begin
// Zugriff auf String blockieren
Try
If Count > 0 Then
Begin
S:=Strings[0];
Delete(0);
End
Else
S := '';
Finally
// Zugriff auf String freigeben
End;
If S <> '' Then
Begin
// Verarbeiten der Einträge
End Break;
End;
Oder du verwendest direkt eine Queue, welche für sowas ausgelegt wurde.
z.B. http://www.delphipraxis.net/internal...t.php?t=167796
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|