usar el RgnData

[delphi.com.ar]

RgnData no es una función, es una estructura con los datos de una región, normalmente utilizado para almacenar regiones irregulares (no rectangulares como la mayoría de las ventanas)

Acá te paso un ejemplo de aplicación de regiones irregulares, la idea es que crees un TForm cualquiera y en el create agregues este código.

procedure TForm1.FormCreate(Sender: TObject);
var
 hRegion: HRGN;
begin
 with ClientRect do
   hRegion := CreateEllipticRgn( Left, Top, Right, Bottom);

 SetWindowRgn( Handle, hRegion, True );
end;

Saludos!