2重起動の制御に関して

.netにてプログラムの２重起動チェックを行いたいのですが、
すでに起動済みのプログラムを起動しようとした場合、
起動されている方を終了してから後に起動された方を起動する
ということは可能でしょうか？
よろしくお願いします。

No.2 ベストアンサー 回答者： W_KNIGHT 回答日時： 2005/10/15 23:46

.netのメソッドではなく、WinAPIになってしまいますが・・

もしそれでよければ

Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Sub cd_Click()

Public Const WINDOW_NAME_0 As String = "???????"
strFilePath = "C:\Program Files\?????"

Dim hWnd_0 As Long

hWnd_0 = FindWindow(vbNullString, WINDOW_NAME_0)
If hWnd_0 = 0 Then
Shell strFilePath, 1
End If

後は、PostMessageのWM_CLOSEを使って
起動したアプリを閉じてもいいと思います。

No.3 回答者： W_KNIGHT 回答日時： 2005/10/16 00:29

↓すみません。

アプリの二重起動と勘違いしてしまいました。
申し訳ありませんでした。

この回答へのお礼

いえいえとんでもないです。貴重なご回答ありがとうございました。APIを使用するというのを参考にさせて頂き、何とか作成できました。

お礼日時：2005/10/27 11:32

No.1 回答者： JeanneNet 回答日時： 2005/10/12 17:26

こんにちは、じゃんぬねっと です。

プロセスさえ取得すれば可能です。

2 重起動のチェックを ProcessName でされているのであれば、
その重複した側の ProcessName から Process を終了して、
CloseMainWindow メソッドと Kill メソッドを入れ子に実行します。

' メイン ウィンドウにクローズ メッセージを送信する
If hProcess.CloseMainWindow() = False Then
　　hProcess.Kill() ' 終了しなかった場合は強制終了する
End If

最初に起動されたかどうかの判断は起動経過時間を比較すると良いです。

この回答への補足

回答ありがとうございます。
申し訳ありません質問に大切なことが抜けていたました。２重起動のチェックを行うプログラムが、
メインのプログラムから呼ばれるサブフォームで、
DLL化されている状態なのですが、これでも可能なのでしょうか？

補足日時：2005/10/12 21:24