用FormConstraint的属性会导致有一个超出限制大小的虚框.
你比较一下用Form的Constraint.MaxWidth,MaxHeight和下面的代码的效果就知道了.
使用过 DELPHI 的朋友都会注意到 DELPHI 本身最上面的窗口，
当它极大时只占屏幕的一小部分，它是如何实现的呢，请看下面的说明：
1) 在 FORM 私有声明部分加上如下一行：
procedureMessage :TWMGetMinMaxInfo ); message WM_GETMINMAXINFO;
WMGetMinMaxInfo( var
2) 在声明部分加上如下几行 :
procedure TForm1.WMGetMinMaxInfo( var Message :TWMGetMinMaxInfo );
begin
with Message.MinMaxInfo^ do
begin
ptMaxSize.X := 200; { 最大化时宽度 }
ptMaxSize.Y := 200; { 最大化时高度 }
ptMaxPosition.X := 99; { 最大化时左上角横坐标 }
ptMaxPosition.Y := 99; { 最大化时左上角纵坐标 }
end;
Message.Result := 0; { 告诉 Windows 你改变了 minmaxinfo}
inherited;
end;