質問者
アプリケーションの最下位レベル

質問
すべての返信
-
常に最背面かどうかわかりませんが、以下を見てみてください。
常に最背面に表示されるウインドウ
http://f57.aaa.livedoor.jp/~jeanne/bbs/faq.cgi?mode=al2&namber=419&KLOG=3 -
VB.NETでも同じようにしたいということでいいんでしょうか?
ウィンドウの最背面表示について
http://dobon.net/vb/bbs/log3-2/938.html -
VB.NETでも同じように、アプリケーションの下に隠したいのですが、
>ウィンドウの最背面表示について
>ttp://dobon.net/vb/bbs/log3-2/938.htmlこの例の通りやったら、画面から消えてしまいました。
現在、メニュープログラムを作成しており、メニューから呼ばれたプログラムより
上に来てしまい、こっまています。
-
とりあえず、ミニマムテストからやって原因を探らないと...
多分、Parent が勝手にすりかえられて消えちゃうんだと思いますけど。
<System.Runtime.InteropServices.DllImport("USER32.DLL", CharSet:=System.Runtime.InteropServices.CharSet.Auto)> _
Private Shared Function FindWindow( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As System.IntPtr
End Function
<System.Runtime.InteropServices.DllImport("USER32.DLL", CharSet:=System.Runtime.InteropServices.CharSet.Auto)> _
Private Shared Function SetParent( _
ByVal hWndChild As System.IntPtr, _
ByVAl hWndNewParent As System.IntPtr) As System.IntPtr
End Function
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim programManagerHandle As System.IntPtr = FindWindow(Nothing, "Program Manager")
If Not programManagerHandle.Equals(System.IntPtr.Zero) Then
SetParent(Me.Handle, programManagerHandle)
End If
End Sub
-
是非、その原因についての詳細をフィードバックしてください。
同じ悩みを持つ、第三者が辿りついて解決できるようになります。このように、インターネット リソースを作っていくのが、フォーラムの役目だとも思っています。
回答者でなくとも質問者はこのように、不特定多数の方に貢献できます。