TextBrowserのメモリリーク？を回避するには？

まるむし 2004-09-19 23:25:17 No: 11021

メモリ上で生成したＨＴＭＬコードをＨＴＭＬ形式で表示するプログラムを作成しているのですが、
実行するとプロセスのメモリ使用量がどんどん増えてゆく現象を確認しました。（タスクマネージャで確認）
調べてみると、どうもTTextBrowserにテキストをセットする毎に増えているようです。

確認方法は以下のように行いました。
CLXアプリケーションで新規プロジェクトを開いて、
CommonControlのTextBrowserとボタンを貼り付けます。
-----------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
TextBrowser1.Text:=ＨＴＭＬコード文字列（ちょっと大き目の方がわかりやすい）;
end;
end.
-----------------------------------------------
回避方法がありましたらよろしくお願い致します。

※TWebBrowserでも良いのですが、直接TEXTをセットできないようなので、
TTextBrowserを使用しています。

環境：Windows 2000(SP4) + Delphi 6(UP2)