Fórum Como fazer forms com pontas retângulares (roundrect)? #238984
22/06/2004
0
Cdteam
Curtir tópico
+ 0Posts
23/06/2004
Emerson Nascimento
Gostei + 0
23/06/2004
Cdteam
sim, eu digitei errado na perssa, foi mal
Gostei + 0
23/06/2004
Marcelo Saviski
Insira esse fragmento abaixo no evento OnCreate seu Form
var Region: HRGN; begin with ClientRect do Region := CreateRoundRectRgn(Left, Top, Right, Bottom, 64, 64); SetWindowRgn(Handle, Region, False); DeleteObject(Region); end;
mais interessante ainda, é usar um programinha, chamado GabesOddForm, para criar formulários baseados em imagens, como citado neste tópico: http://delphiforum.icft.com.br/forum/viewtopic.php?t=20944&highlight=gabesoddform
:!:
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)