如何最小化窗口

Question

我用delphi做出的窗口如何最小化

Answer 1

如果是按下按钮最小化, 就在按钮的点击事件中添加
Application.Minimize;如果说是一开始运行就最小化, 就在窗体设计的时候高定
WindowState 属性为 wsMinimized 就可以了

Answer 2

private
    { Private declarations }
  Procedure WMSysCommand(Var msg : TMessage);Message WM_SYSCOMMAND;  
......
procedure TForm1.WMSysCommand(var msg: TMessage);
begin
 if (msg.WParam=SC_MINIMIZE) then
  begin
     application.minimize;
  end
  else
    Inherited;
end;

Answer 3

delphi 和borland c++都是这样，不如vb,vc,
强烈建议borland 改进一下！！！