Tamaño mínimo del form

[Cecilio]

Hola.
Intento controlar que una form no pueda hacerse más pequeña de unos pixeles determindos con este código:

Código Delphi [-]
procedure TForm1.FormResize(Sender: TObject);
begin
if form1.Width<660 then
  form1.Width:=660;
end;

Funciona, pero hace unos parpadeos muy poco esteticos.
¿ como pude controlar las dimensiones sin esos parpadeos ?

Gracias.