OleContainerでの表示が遅い

なな 2008-01-25 01:40:04 No: 29466

// 既存のExcelファイルをOLEコンテナのオブジェクトとする
OleContainer.CreateObjectFromFile('EXCELファイル名', False);
でOLEContainerに表示

TQueryを使用して
Edit;
TBlobField(FieldByName('保存フィールド')).LoadFromFile('EXCELファイル名');
Post;
で保存してます。

これを再度読み出すときには、DBからTQueryを使い
TBlobField(Fields.FieldByName(保存フィールド')).SaveToFile('EXCELファイル名');
で取り出して、

OleContainer.CreateObjectFromFile('EXCELファイル名', False);
で表示して制御

プログラムを作ってみました。

WindowsXP+Excel2000だと多少遅いですが、まだ我慢できます。
WindowsXP+Excel2002、2003で試してみると場合によっては、20秒
以上かかるときもあります。

OLEContainerへの表示を高速化する方法はないでしょうか？
Delphi5で作っています。