Delphi dicas

Como deixar o form redondo!

procedure TForm1.FormCreate(Sender: TObject);

var Hd : THandle;

begin

        Hd := CreateEllipticRgn(0,0,400,400);

        SetWindowRgn(Handle,Hd,True);

end;



//muito simples.

por : Magno Francis