我需要设置一个开关，可以自由控制，整个窗口界面是否可以手动拉大界面，求指教

。。。。。
把FORM的属性中 AutoSize改成false 就可以随便拉了。

procedure TForm1.btn1Click(Sender: TObject);
begin
  Form1.AutoSize := not Form1.AutoSize;
end;