- ベストアンサー
Delphi 閉じてないウインドウを閉じる
Delphi 6 です。 実行中の「***.exe」（ウインドウ）を閉じさせる方法はありますか？ 実行中のAAA.exeをでBBB.exeから閉じさせる方法です。 強制終了でなく、OnCloseイベントにも行く方法を教えて下さい。
- situmonnsya
- お礼率70% (374/532)
- その他（プログラミング・開発）
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Top Level WindowにWM_CLOSEメッセージを送ってみてはどうでしょうか。ただし、これはWindowを閉じる操作と同じですからアプリケーションによっては素直に終了しません。例えば編集中のメモ帳では「保存しますか？」のダイアログが現れます。（イベントが発生するという意味ではご要望どおりですが） Windows XP Pro SP2 + Delphi2006で試していますが他のWindows + Delphi6でも同じだと思います。 ----- var Wh: HWND; ： Wh := FindWindow('Notepad', nil); // メモ帳をクラス名で探す if Wh <> 0 then PostMessage(Wh, WM_CLOSE, 0, 0) else ShowMessage('メモ帳は起動されていません。'); -----
お礼
実験してみました。 希望どうりの結果です。 今日は遅いので、明日作成中のソフトに組込みます。 ありがとうございました。