Delphi 분석과 비법 -김동희 지음
   책을 참고로 말씀을 드릴께요..

   거기서는 이렇게 하라고 되있는데요...

procedure TForm1.FormCreate(Sender: TObject);
var
   aelliptic : HRGN;
begin
     AElliptic := CreateEllipticRgn (0, 0, width, height);
     SetWindowRgn (handle, AElliptic, TRUE);
end;

   이렇게 하면 타원으로 되죠...
   그럼

   ps. 소개해 드린 책은 2.0 으로 만들어 진 것이나
       3.0에서도 무리없이 쓸 수 있습니다.