delphi 窗体最大化
点击button,窗体最大化，这个怎么写啊？

[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
begin
WindowState:=wsMaximized;
end;
[解决办法]

探讨

procedure TForm1.Button1Click(Sender: TObject);
begin
WindowState:=wsMaximized;
end;

[解决办法]
ShowWindow(Handle, SW_SHOWMAXIMIZED)
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
begin
WindowState:=wsMaximized;
end;

或者

ShowWindow(Handle, SW_SHOWMAXIMIZED)