Delphi：スレッドセーフなグローバルTListを作成するには？

Question

スレッドセーフグローバル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に書き込むことができる2つのスレッドを持っていますが、わかっているようにスレッドセーフではありません。

どのように安全にするには？

デルファイ2010年、インディ10、Win7の

Answer 1

使用TThreadList。問題が解決しました。