Itemanzahl in einer TThreadList

[Tubos]

Hallo;

wie kann ich - threadsicher - die Anzahl der Items in einer TThreadList feststellen?
var x: TThreadList; x.count gibt es nicht.

Und wenn ich direkt auf x.locklist.count zugreife, ist es doch nicht mehr threadsicher, oder?

Tubos

[Luckie]

Zitat von Tubos:

Und wenn ich direkt auf x.locklist.count zugreife, ist es doch nicht mehr threadsicher, oder?

Doch genau dann ist es threadsicher:

Zitat:

LockList calls the Windows EnterCriticalSection function to lock the thread-safe list.

Zu mindest interpretiere ich so die Hilfe.

[Nalincah]

TThreadlist? Threadsicher?

Ich versteh nicht ganz..Was heißt das?

[sakura]

Delphi-Quellcode:

var
  x: TThreadList;
  L: TList;
...
// später
L := X.LockList;
try
  ShowMessage(IntToStr(L.Count));
finally
  X.UnlockList;
end;

(siehe auch Delphi-Beispiel zu LockList

......

[sakura]

Zitat von General2004:

TThreadlist? Threadsicher?

Ich versteh nicht ganz..Was heißt das?

Dann schaue Dich mal im Forum nach [dp="thread*"]Threads, threading, multi-tasking, etc...[/dp] um. Eine Threadliste bietet die Möglichkeit aus verschiedenen, parallel laufendenn Teilen (Threads) einer Application gleichzeitig sicher auf eine Liste von Objekten zuzugreifen.

......

[Tubos]

Zitat:

Code:

var 
  x: TThreadList; 
  L: TList; 
... 
// später 
L := X.LockList; 
try 
  ShowMessage(IntToStr(L.Count)); 
finally 
  X.UnlockList; 
end;

Heißt das, ich muss die Liste manuell absperren?

[sakura]

Zitat von Tubos:

Heißt das, ich muss die Liste manuell absperren?

Schau mal hier, die Definition:

Delphi-Quellcode:

  TThreadList = class
  private
    FList: TList;
    FLock: TRTLCriticalSection;
    FDuplicates: TDuplicates;
  public
    constructor Create;
    destructor Destroy; override;
    procedure Add(Item: Pointer);
    procedure Clear;
    function  LockList: TList;
    procedure Remove(Item: Pointer);
    procedure UnlockList;
    property Duplicates: TDuplicates read FDuplicates write FDuplicates;
  end;

Ich würde sagen: eindeutig: JA.

......

[Tubos]

Habe gerade was in der Delphi-Hilfe gefunden:

Zitat:

]Die Methode LockList sperrt die thread-sichere Liste und gibt ein TList-Objekt zurück.

Delphi-Syntax:

function LockList: TList;

C++ Syntax:

TList* __fastcall LockList(void);

Beschreibung

Unter Windows ruft LockList die Windows-Funktion EnterCriticalSection zum Sperren der thread-sicheren Liste auf. Die Methode gibt das TList-Objekt zurück, in dem sich die Liste befindet.

Heißt das, ich kann über threadlist.locklist.count die Anzahl feststellen, ohne dass ich sie irgendwie sperren muss?

[sakura]

Zitat von Tubos:

Heißt das, ich kann über threadlist.locklist.count die Anzahl feststellen, ohne dass ich sie irgendwie sperren muss?

Der Aufruf von LockList - in Deinem Aufruf enthalten - sperrt die Liste bereits. Deswegen musst Du diese anschließend WIEDER FREIGEBEN.

Was an meinem obigen Code ist nicht verständlich

......

[Tubos]

Achso...

was nützt mir dann eine "thread-sichere Liste", wenn ich an einigen Stellen sowieso manuell sperren muss?

edit:
ops...habe das ganze konzept falsch verstanden.
jetzt kapiere ich es.
Danke!