win32：检测开始菜单是否自动隐藏？

Question

我想在窗口底部放置一个窗口。如果开始菜单存在，我希望它位于开始菜单的顶部。如果不是（或者它是自动隐藏的），我仍然希望它的位置与开始菜单的位置相同，这意味着会有几个像素的间隙。

目前，我得到了监视器工作区，将窗口放在底部，并总是偏移20像素左右。如果开始菜单不存在，这可以很好地工作。但是，如果是这样，工作区域也会缩小（因为它应该），并且我最终会实现双重抵消。

我该如何解决这个问题？

Answer 1

您是否在您的项目中使用或有权访问.NET？

如果是这样，您可以使用Screen.PrimaryScreen.WorkingArea.Height属性来确定不包括任务栏的屏幕底部。

您还可以通过获取Screen.PrimaryScreen.Bounds.Height属性（其中包括总高度值中的任务栏）来获取总屏幕高度。

比较这些值，如果它们相同，任务栏不存在。否则，任务栏是，您可以相应地进行调整。

Answer 2

为了获得不是由系统任务栏或应用程序的桌面工具栏遮挡屏幕的工作区，你可以使用SystemParametersInfo()与SPI_GETWORKAREA为uiAction参数。参数必须指向接收工作区坐标的结构，用虚拟屏幕坐标表示。例如：

RECT rectWorkArea; 
    SystemParametersInfo(SPI_GETWORKAREA, 0, &rectWorkArea, 0); 

当您在评论说，让任务栏的边框，我们可以调用SHAppBarMessage(ABM_GETTASKBARPOS, ...)

要确定在任务栏的位置（当前是否处于底部，您可以使用以下计算：

type 
    TTaskBarPos = (_TOP, _BOTTOM, _LEFT, _RIGHT); 
    var 
    iScrW, iScrH: Longint; 

    iScrW := GetSystemMetrics(SM_CXSCREEN); 
    iScrH := GetSystemMetrics(SM_CXSCREEN); 

    if (rectTaskbar.Top > iScrH div 2) and (rectTaskbar.Right >= iScrW) then 
    Result := _BOTTOM 
    else if (rectTaskbar.Top < iScrH div 2) and (rectTaskbar.Bottom <= iScrW div 2) then 
    Result := _TOP 
    else if (rectTaskbar.Left < iScrW div 2) and (rectTaskbar.Top <= 0) then 
    Result := _LEFT 
    else 
    Result := _RIGHT; 

它们应该足以解决您当前的问题。但是，如果您需要知道（出于其他原因）自动隐藏和始终处于顶部状态的当前任务栏设置，则可以使用SHAppBarMessage(ABM_GETSTATE, ...)。

如果需要通知任务栏的自动隐藏或始终在顶状态已更改，则必须拦截ABN_STATECHANGE消息。