Delphi：如何创建一个线程安全的全局TList？

如何创建一个线程安全的全局TList？Delphi：如何创建一个线程安全的全局TList？

unit Unit1; 
interface 
uses 
    ...; 
type 
    TForm1 = class(TForm) 
    procedure FormCreate(Sender: TObject); 
    end; 

var 
    Form1: TForm1; 
    global_TList: TList; // Not thread safe? 

implementation 

{$R *.dfm} 

procedure TForm1.FormCreate(Sender: TObject); 
begin 
// something 
end; 

end.

我有两个线程，可以写入global_TList，但据我所知，它不是线程安全的。

那么如何让它安全？

德尔福2010年，印第安纳波利斯10，Win7的

来源

2011-12-07 waza123

相关：http://stackoverflow.com/questions/302583/how-can-i-implement-a-thread-safe-list-wrapper-in-delphi –

请参阅[Delphi帮助]（http：// docwiki .embarcadero.com/CodeExamples/XE2/en/TThreadList_（Delphi））举例说明如何使用TThreadList。 –

使用TThreadList。问题解决了。

来源

2011-12-07 00:38:32 dthorpe

我可以在线程中使用TThreadList吗？ – waza123

这就是TThreadList的目的。 TThreadList不是线程列表，它是一个可以同时从多个线程安全使用的TList。 – dthorpe

谢谢！我强硬这是一些更衣室..但没有任何性能.count，如何计数？ – waza123

Delphi：如何创建一个线程安全的全局TList？

回答

相关问题