Fórum Como fazer forms com pontas retângulares (roundrect)? #238984

22/06/2004

0

Olá Pessoal, alguém sabe como fazer esse tipo de form?


Cdteam

Cdteam

Responder

Posts

23/06/2004

Emerson Nascimento

seria ´pontas arredondadas´?


Responder

Gostei + 0

23/06/2004

Cdteam

seria ´pontas arredondadas´?

sim, eu digitei errado na perssa, foi mal


Responder

Gostei + 0

23/06/2004

Marcelo Saviski

para criar for Forulário não retângulares, usa-se [color=darkblue:1c2ece3903][i:1c2ece3903]Regions[/i:1c2ece3903][/color:1c2ece3903], um exemplo de formulário com cantos arredondados, pode ser obtido com o seguinte código

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

:!:


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar