我将一个窗口的大小设定为450×450,如何做到限定它的最小大小即为450×450?  

解决方案 »

  1.   

    form1.constraints.MinHeight ;=450
      form1.constraints.MinWidth :=450;
      

  2.   

    procedure TForm1.FormResize(Sender: TObject);
    begin
      
    end;
      

  3.   

    procedure TForm1.FormResize(Sender: TObject);
    begin
      if Width < 450 then Width = 450;
      if Height < 450 then Height = 450;
      
    end;另外Contraints也可以,不知对窗体起不起作用试一下吧