例:
//---------------------------------------------------------------------------
bool __fastcall IsPopupWindowShown()
{
HWND ownerWindow = Application->Handle;
HWND lastActivePopupWindow = GetLastActivePopup(ownerWindow);
return lastActivePopupWindow != ownerWindow && IsWindowVisible(lastActivePopupWindow);
}
//---------------------------------------------------------------------------