窗体问题！！！！！

Question

如何做到象QQ那样，拉窗体边界的时候，拉到一定的大小就不能拉了。最后一点分了，谢谢帮忙！！！

Answer 1

Form's   OnConstrainedResize 
procedure TForm1.FormConstrainedResize(Sender: TObject; var MinWidth,
  MinHeight, MaxWidth, MaxHeight: Integer);
begin
  MaxWidth :=400;
  MaxHeight:=300;
end;

Answer 2

设置窗体属性Constraints之MaxHeight、MaxWidth、MinHeight、MainWidth数值就OK