当另一个表单以模态方式显示时,如何制作未禁用的表单？

Question

我有一个实用程序对话框(非模态和保持在顶部),在使用应用程序时应始终可访问(即使是模态对话框,也可以使用可用于在处理应用程序时记笔记的对话框)显示.

其余的应用程序无法更改.

可能吗？我该怎么办呢？

Answer 1

当ShowModal被调用时,所有现有的顶级窗口被禁用.这就是模态的工作方式.如果您有一个合理的交互窗口,您只需要再次启用它.

例如,您可以将其添加到实用程序窗口:

type
  TMyUtilityForm = class(TForm)
  protected
    procedure WMEnable(var Message: TWMEnable); message WM_ENABLE;
  end;
....
procedure TMyUtilityForm.WMEnable(var Message: TWMEnable);
begin
  if not Message.Enabled then
    EnableWindow(Handle, True);
  inherited;
end;

这将确保永远不会禁用您的实用程序窗口.