Pregunta: | 3170 - FORMULARIOS SIN BORDES |
Autor: | Ronal Guerrero |
Deseo crear un formulario que no tenga bordes ni sea rectangular sino que tenga una forma personalizada (redondo). Como puedo hacer esto????? |
Respuesta: | Eladio Bombin |
Te detallo el código que debes poner en el FormCreate que quieres que sea redondo:
procedure TForm3.FormCreate(Sender: TObject); Var hRgn: THandle; begin ... hRgn := CreateEllipticRgn(0, 0, Width - 5, Height - 5); SetWindowRgn(Handle, hRgn, False); ... end; Con este código el formulario saldrá ovalado o redondo dependiendo de las medidas que pongas en la función: hRgn := CreateEllipticRgn(0, 0, Width - 5, Height - 5); Previamente la propiedad BorderStyle del formulario debe estar en bsNone Saludis y Espero que te sirva |
Respuesta: | Luis González Fernández |
Facil...muy facil... simplemente utiliza algun componente (busca en la web de "Torry´s" : http://torry.spang.org/ ó en "Delphi superpage": http://delphi.icm.edu.pl/) que te permita cargar una imagen con fondo transparente en un formulario....y utiliza la imagen a modo de "formulario"... seguro que tal componente viene con algun ejemplo de utilizacion... El componente existe desde luego...y creo que es Freeware... Que disfrutes... |