Ver Mensaje Individual
  #2  
Antiguo 21-05-2003
Avatar de guillotmarc
guillotmarc guillotmarc is offline
Miembro
 
Registrado: may 2003
Ubicación: Huelva
Posts: 2.638
Reputación: 24
guillotmarc Va por buen camino
Hola.

Prueba esto, en el Create del Form pones :

Código:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.Brush.Style := bsClear;
  Self.BorderStyle := bsNone
end;
Con esto el formulario ya es transparente. Ahora tienes que poner un TImage en el Formulario, y asignarle una imagen de tipo bitmap. Si asignas la propiedad Transparent a True, ya no saldrán los bordes (todo el borde a recortar tiene que ser de un mismo color)

Saludos.
__________________
Marc Guillot (Hi ha 10 tipus de persones, els que saben binari i els que no).
Responder Con Cita