エクセルのプロセスの判定するには？

解決

にかわ 2007-06-13 07:05:57 No: 26620

Dlephiを使い始めたばかりなのですが、
TwebBrowserを使用してExcelを表示させるプログラムを作成しているのですが、Excelを終了する前に、途中で終了しているかを判定する関数又は方法は無いでしょうか？

procedure TForm1.FormClose(Sender: TObject; var Action:TCloseAction);
begin

       ----ここで判定する----

       ExcelApplication1.Quit;
       ExcelApplication1.Disconnect;
end;

Ru 2007-06-13 17:18:35 No: 26621

途中で終了しているかの判断ではないですが，
現在Excelのプロセスが存在しているかは下記のＡＰＩで取得できると思います。

GetActiveOleObject

失敗すれば指定のプロセスは無かったことになります。
使い方と言うほど難しい関数ではないので検索すればすぐ分かると思います。
失敗の感知は

try..except..end

でできるかな。

にかわ 2007-06-13 18:12:14 No: 26622

GetActiveOleObject
ですね！ありがとうございます！
さっそくやってみます！