Deixar o Form redondo.

[Luiz_Eduardo 0]

Galera, goataria de saber como faço para editar o tamanho de um form para tipos diferentes, como redondo, triangular e etc...pois gostaria de iniciar a aplicação com um form parecido com o do corel draw, pois quando ele é iniciado aparece a logomarca da corel e todo seu desktop fica visível entre a imagem.

[marcio.theis 3]

Para fazer um form redondo, pode colocar no OnCreate algo do tipo:

 

var	Hd: THandle;BeginHd:=CreateEllipticRgn(0,0,400,400);SetWindowRgn(Handle,Hd,True);

Outro exemplo se quiser fazer um furo no form, faça:

 

var	Region, Region2: hrgn;beginForm1.FormStyle:=fsStayOnTop;Region:=CreaterectRgn(0,0,width,height);Region2:=CreatePolyPolygonRgn(30,30,100,100);CombineRgn(region, region, region2, RGN_DIFF);SetWindowRgn(handle, region, true);

[bdexterholland 0]

ou se for no delphi7, defina o form como transparente e use os timages, mas vai ficar pesado...

[Luiz_Eduardo 0]

Valeu Brother, mas onde eu encontro os componetes para usar os TImages ou qualquer um que suporte gif ou png?

[bdexterholland 0]

o timage suporta:

dib

jpg

jpeg

bmp

ico

emf

wmf

--------------

A figura não precisa ter transparencia, basta fazer um

image1.transparent := true;

sendo que você deve colorir as partes que devem ficar transparente de #00FF00 ou #FF00FF