| ■ GetLastActivePopup |
| 指定したウィンドウの最後のポップアップウィンドウを取得します |
| ＶＢで作成したアプリケーションなどの場合、ポップアップウィンドウがないので、この関数を使用しても意味はありません |
| この場合、hWndOwnder がそのまま戻り値に入ります |
'------------------------------------------------------------------------------
' 最終アクティブ・ポップアップウィンドウ取得（宣言）
'------------------------------------------------------------------------------
Declare Function GetLastActivePopup Lib "user32" (ByVal hWndOwnder As Long) _
As Long
Dim w_hwnd As Long ' ハンドル
Dim w_popuphwnd As Long ' 戻り値
' 指定したウィンドウの最後のアクティブウィンドウハンドルを取得する
w_popuphwnd = GetLastActivePopup(w_hwnd)
|