请教怎么实现当非主窗口最小化时，其主窗口也一起最小化？多谢

请问如何实现当非主窗口最小化时，其主窗口也一起最小化？谢谢
例如，form1上加按钮，点击按钮生成from2,当 from2最小化时，from1也一起最小化。
from1不能设MDI,from2也不能设child.
这是一个不同用户进入不同界面的程序，开始设计时没有设父窗口，子窗口。

[解决办法]
子窗体加入如下代码即可：

Delphi(Pascal) code

  private    procedure WMSYSCOMMAND(var msg: TMessage); message WM_SYSCOMMAND;  procedure TForm2.WMSYSCOMMAND(var msg: TMessage);begin  if msg.WParam = SC_MINIMIZE then    Application.Minimize  else   inherited;end;
[解决办法]
探讨

子窗体加入如下代码即可：

Delphi(Pascal) code

  private
    procedure WMSYSCOMMAND(var msg: TMessage); message WM_SYSCOMMAND;

  
procedure TForm2.WMSYSCOMMAND(var msg: TMessage);
begin
  if msg.WParam……

[解决办法]
不错，学习了
[解决办法]
發系統WMSYSCOMMAND消息給FORM的Minimize...