窗口最小化(50)

procedure TForm2.CreateParams(var Params: TCreateParams)
//窗口置顶begin inherited CreateParams(Params)
with params do begin ExStyle := WS_EX_TOOLWINDOW or WS_EX_TOPMOST
WndParent := GetDesktopWindow
end
end;procedure TForm2.FormCreate(Sender: TObject)
begin SetWindowPos(Self.Handle,HWND_TOPMOST,Left,Top,Width,Height,0);//窗口置顶end
有两个窗口的程序，第二个窗口FORM2 borderstyle是bsNonewindowstate是wsNormal用procedure TForm2.SpeedButton3Click(Sender: TObject);beginApplication.Minimize;end;最小化不行呢？得用什么办法？

分数不能回吞~[]

把分散了吧。

问题如上