【发布时间】:2013-12-13 19:18:16
【问题描述】:
除了我的主窗体之外,我还需要我的窗体来通知我的主窗体并在我最小化它们时隐藏它们(而不是最小化到桌面窗口)。
如何做到这一点?
我的表单是这样创建的:How to make my Forms always to be on top my main form?
【问题讨论】:
除了我的主窗体之外,我还需要我的窗体来通知我的主窗体并在我最小化它们时隐藏它们(而不是最小化到桌面窗口)。
如何做到这一点?
我的表单是这样创建的:How to make my Forms always to be on top my main form?
【问题讨论】:
处理WM_SYSCOMMAND 消息以检测最小化:
type
TMyForm = class(TForm)
....
protected
procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;
....
end;
....
procedure TMyForm.WMSysCommand(var Message: TWMSysCommand);
begin
if Message.CmdType and $FFF0 = SC_MINIMIZE then
Hide
else
inherited;
end;
此时您也可以通过您选择的任何机制通知主表单。
【讨论】: