タスクバーにある格タスクスイッチ・ボタンのウィンドウ ハンドルや
トレイにある格アイコンのウィンドウ ハンドルを取得したいのですが、
どの様にすれば良いのでしょうか?
使用目的は、"DrawAnimatedRects()"関数でアニメーション効果を与えOpen, Closeさせる。
(ウインドメニューの「元のサイズに戻す」「最小化」と同等の動作)
FindWindowEx()関数でやっているのですが、取得出来ません。 [ここをクリックすると内容が表示されます]
Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
(hWnd1 As Long, hWnd2 As Long, lpsz1 As String, lpsz2 As String) As Long
'タスクバーのハンドル
hTaskBar =FindWindow("Shell_TrayWnd", NULL)
hTaskTry =FindWindowEx(hTaskBar, 0, "TrayNotifyWnd", NULL)
'XP用
hTaskBar =FindWindowEx(hTaskBar, 0, "ReBarWindow32", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, "MSTaskSwWClass", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, "ToolbarWindow32", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, NULL, "AB") <---------- 失敗
宜しくお願いします。Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
(hWnd1 As Long, hWnd2 As Long, lpsz1 As String, lpsz2 As String) As Long
'タスクバーのハンドル
hTaskBar =FindWindow("Shell_TrayWnd", NULL)
hTaskTry =FindWindowEx(hTaskBar, 0, "TrayNotifyWnd", NULL)
'XP用
hTaskBar =FindWindowEx(hTaskBar, 0, "ReBarWindow32", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, "MSTaskSwWClass", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, "ToolbarWindow32", NULL)
hTaskBar =FindWindowEx(hTaskBar, 0, NULL, "AB") <---------- 失敗