如何控制你的窗体的尺寸，最大化时的位置
在Delphi，窗体有一个称为"Constraints"的新属性，我们可以用它来设置窗体的最大和最小尺寸。
试一试下面的代码：
// 在你的窗体的私有部分声明:
procedure WMGetMinMaxInfo( var Message : TWMGetMinMaxInfo ); message
WM_GetMinMaxInfo;
// 写下面过程:
procedure TForm1.WMGetMinMaxInfo( var Message : TWMGetMinMaxInfo );
begin
// 设置窗体能被用户调整的最大尺寸
Message.MinmaxInfo.ptMaxTrackSize.x := 500;
Message.MinmaxInfo.ptMaxTrackSize.y := 500;
// 设置窗体能被用户调整的最小尺寸
Message.MinmaxInfo.ptMinTrackSize.x := 300;
Message.MinmaxInfo.ptMinTrackSize.y := 300;
// 设置窗体最大化时的尺寸（新的！）
Message.MinmaxInfo.ptMaxSize.x := 500;
Message.MinmaxInfo.ptMaxSize.y := 500;
// 设置窗体最大化时的x、y座标（新的！）
Message.MinmaxInfo.ptMaxPosition.x := 20;
Message.MinmaxInfo.ptMaxPosition.y := 20;
end;
