如何忽略应用程序级别的系统消息？ (WM_SettingChange / WM_WinIniChange)

Question

当用户更改其 Windows 区域设置中的日期格式时，我们有一个应用程序行为异常。 （是的，解决方案是解决不当行为——不是重点。）

更改设置会向所有应用程序广播WM_SETTINGCHANGE 消息。我们试图通过忽略此消息来避免我们的问题，并保持日期格式不变（目前，作为修补程序）。

无论我做什么，TMonthCalendar 组件仍会更改其格式，TDateTimePicker 使用TMonthCalendar 作为其弹出窗口。

我试过了（结果都一样）：

• 覆盖TForm::WndProc()

  void __fastcall TfrmMainWindow::WndProc( TMessage & msg )
  {
    if( msg.Msg == WM_SETTINGCHANGE )  return;  // ignore
  
    TForm::WndProc( msg );
  }
  

• 使用Application->HookMainWindow( hookWindowsMessage ); 设置挂钩
• 设置TApplication.UpdateFormatSettings = false;
• 设置Application->OnEvent = onApplicationEvent; 以捕获所有事件...但不幸的是，此特定情况属于“OnMessage 仅接收发布到消息队列的消息，而不是直接使用 Windows API SendMessage 函数发送的消息”。规则。

似乎覆盖WndProc() 几乎是一个好主意，只是它只影响那个窗口，而不是整个应用程序。我以为这就是 Application->HookMainWindow() 的用途，但显然不是。

有人知道如何解决或规避这个问题吗？

Answer 1

正如 Cody Gray 在上面的评论中所说，问题不在于消息处理，而是 TMonthCalendar 组件使用 Win32 API 日历，因此在应用程序上下文之外工作。

但是，对于所有其他组件（即TDateTimePicker 的行编辑）和内部全局变量（如ShortDateFormat 等），可以忽略格式更改，如下所示：

class TfrmMainWindow : public TForm
{
public:
  __fastcall TfrmMainWindow( TComponent * Owner )
    : TForm( Owner )
    {
      Application->HookMainWindow( hookWindowsMessage );
    }

  __fastcall ~TfrmMainWindow()
    {
      Application->UnhookMainWindow( hookWindowsMessage );
    }

private:
  bool __fastcall hookWindowsMessage( TMessage & msg )
    {
      if( msg.Msg == WM_SETTINGCHANGE )
      {
        String sLParam( (char *)msg.LParam );

        // Check for Region Settings change (not Desktop background etc.)
        if( sLParam.LowerCase() == "intl" )
        {
          return true;  // ignore message
        }
      }

      return false;  // handle message as usual
    }
};

来源：
"Trapping Messages Sent to an Application"

"TMonthCalendar displays dates according to the system locale (ignoring the BiDiMode setting)."

"The Win32 API provides a control used to select dates on a colorful calendar. The dates used and the way they display are based on the Regional Settings of the Control Panel."