Dicas - Formulários não retangulares

Veja esta dica, para deixar os formulários com uma "cara" diferente.

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;

Ebook exclusivo
Dê um upgrade no início da sua jornada. Crie sua conta grátis e baixe o e-book

Artigos relacionados