Imagen png con formulario transparente?

[[ArdiIIa]]

Prueba esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
Brush.Style := bsClear;
BorderStyle := bsNone;
end;

Saludos

[marcosl]

Fide, eso solo funciona con los bmp si tengo un png tengo colores Alpha, que son los colores alpha, son todos aquellos que se funden con el color que tenemos de fondo, si pongo un color y lo pongo como transparente el borde de la imagen queda pixelada y horrible.

Ardilla, eso es lo q es estoy haciendo pero no soluciona el refresco del fondo del splash al cambiar el fondo del escritorio.


talves.. un timer... o capturar el mesaje de windows cuando se mueven las ventanas...

[[ArdiIIa]]

Empezado por marcosl

Ardilla, eso es lo q es estoy haciendo pero no soluciona el refresco del fondo del splash al cambiar el fondo del escritorio.
talves.. un timer... o capturar el mesaje de windows cuando se mueven las ventanas...

Ya me di cuenta después y realicé otras pruebas....

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, jpeg, ExtCtrls, StdCtrls, ComCtrls;

type


  TForm1 = class(TForm)
    Image1: TImage;
    ProgressBar1: TProgressBar;
    procedure CreateParams(var Params: TCreateParams); override;
    procedure InicioProcesos;
    procedure Image1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;


var
  Form1: TForm1;

implementation

{$R *.dfm}



procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle OR WS_EX_TRANSPARENT;
  Brush.Style := bsClear;
  BorderStyle := bsNone;
  Refresh;
end;


procedure TForm1.InicioProcesos;
Var I : integer;
begin
For I := 0 To 100 DO
  Begin
    Sleep(50);
    ProgressBar1.Position := I;
  End;
Close;

end;

procedure TForm1.Image1Click(Sender: TObject);
begin
  InicioProcesos;
end;

end.

OJO: Código original

[marcosl]

Bien ardilla estamos un paso mas cerca o almenos hicimos uno al costado...

El tema es este, cuando se abre otra ventana mi splash queda detras... y si lo traigo adelante cuesta un poco que me haga caso, y por otro lado si lo tengo adelante y muevo cualquier ventana que tenga de fondo el splash se mueve con el...

ya se ya se se hace lo que se puede lo que no se compra hecho, igual no vi el cod solo lo implemente dentro de un rato veo como resolver estos dos temas restantes.

Gracias por tu colaboración...

[marcosl]

..que econtre fue que si mi aplicacion esta maximizada y hay otra aplicacion corriendo mi imagen de splash se borra al minimizar o maximizar otras ventanas, tambiem encontre el defecto o limitacion que al abrir otra ventana mi imagen se reproduce en todas las ventanas que abro (esto si antes movi la ventana anterior con mi splash que se muevo en conjunto a las otras ventanas)...preguntando se llega a Roma, o no.


Ô_o

[jhonyboy777]

instalale el suipack a delphi y trae una herramienta con la que puedes crear formas o formularios a partir de una imagen, solo funciona con bmp pero no hay problema ya que en la configuracion del componente te quita el color que tu gustes para que sea tranaparente espero que te sirva esta informacion y que no sea muy tarde

[emesystem]

[quote=ArdiIIa;248408]Ya me di cuenta después y realicé otras pruebas....

que tal [ ARDILLA ]
MUCHISIMAS GRACIAS, A MI SI ME SIRVIÓ TU EJEMPLO
ESO ES LO QUE ANDABA BUSCANDO EXACTAMENTE!
TE ENVÍO UN GRAN SALUDO!
Y POR CIERTO TENDRÁN CÓDIGO,
PARA VISUALIZAR VIDEO ATRAVES DE UNA CAMARA WEB!?
SE LOS AGRADECERÍA MUCHISIMO