Criando Formulários não retangulares
Para deixar os formulários de seus projetos com uma cara diferente, você deve criar uma região do Windows e usar a função da API SetWindowRgn. Veja o código:
var
hR : THandle;
begin
{cria uma Região elíptica}
hR := CreateEllipticRgn(0,0,100,200);
SetWindowRgn(Handle,hR,True);
end;