Formの最小サイズを指定するには？？

解決

boon 2005-08-08 01:47:04 No: 16928

Formをリサイズの最小サイズを
Form1.Width := 320;
Form1.Height := 240;
に指定し、それ以上小さくならない様にしたいんですが
うまくいきません！！

procedure TForm1.FormResize(Sender: TObject);
begin
  if Form1.Width <= 320 then
    Form1.Width := 320;
  if Form1.Height <= 240 then
    Form1.Height := 240;
end;

としましたが、ウィンドウがLunaを保てずクラシックスタイルになってしまいます。
環境はWinXP+Delphi6Personalです。よろしくお願いします。

これが正解！ 2005-08-08 01:58:06 No: 16929

Constraints

boon 2005-08-08 02:02:05 No: 16930

出来ました〜ｗ
お早い回答ありがとうございました！！
また教えて下さいねっ