金曜日, 5月 09, 2008
[VB2005]別ウィンドウ(別EXE)の最前面表示
▼質問
別ウィンドウ(別EXE)で起動したアプリを最前面に表示したいんだ。どうしたらよいのか?
▼回答
次のAPIを使えばできるぞ!
API名は『BringWindowToTop』だ。
次にサンプルを示しておくから参考にしてくれ!!
'ウィンドウを最前面に表示する関数宣言
Declare Function BringWindowToTop Lib "user32.dll" Alias "BringWindowToTop" (ByVal hWnd As Int32) As Int32
'最上位フォーム設定解除
Me.TopMost = False
'プロセスを起動する.
prs = Process.Start(起動EXEパス, パラメータ)
'最上位フォーム設定
BringWindowToTop(CInt(prs.MainWindowHandle))
prs.WaitForExit()
prs.Dispose()
prs.Close()
'最上位フォーム設定
Me.TopMost = True
別ウィンドウ(別EXE)で起動したアプリを最前面に表示したいんだ。どうしたらよいのか?
▼回答
次のAPIを使えばできるぞ!
API名は『BringWindowToTop』だ。
次にサンプルを示しておくから参考にしてくれ!!
'ウィンドウを最前面に表示する関数宣言
Declare Function BringWindowToTop Lib "user32.dll" Alias "BringWindowToTop" (ByVal hWnd As Int32) As Int32
'最上位フォーム設定解除
Me.TopMost = False
'プロセスを起動する.
prs = Process.Start(起動EXEパス, パラメータ)
'最上位フォーム設定
BringWindowToTop(CInt(prs.MainWindowHandle))
prs.WaitForExit()
prs.Dispose()
prs.Close()
'最上位フォーム設定
Me.TopMost = True