Einzelnen Beitrag anzeigen

grasmann

Registriert seit: 11. Apr 2008
3 Beiträge
 
#3

Re: PNG auf Layered Window zeichnen

  Alt 19. Apr 2008, 01:17
Danke für den Tipp. Habs jetzt mit Draw direkt auf das Bild gezeichnet bevor es quasi der Form attached wird:

Delphi-Quellcode:
form1.Label7.Caption := 'Close';
Bit2 := TBitmap32.Create;
LoadPNGintoBitmap32(Bit2, ExtractFilePath(ParamStr(0)) + 'close_blend.png', Alpha);
bit2.Width := 84;
bit2.Height := 58;

bit2.DrawMode := dmblend;
bit2.CombineMode := cmMerge;
Bit2.DrawTo(bit,114,-5);

bit2.free;
Und danach dann halt

UpdateLayeredWindow(Handle, 0, nil, @Size, Bit.Handle, @P, 0, @BlendF, ULW_ALPHA); Ich denk so is das jetzt die günstigste Lösung.

Der Code ist jetzt sogar kürzer als vorher ... ich dachte eher der würde noch länger werden.

Ich hab das Ergebnis ma angehängt ^^

EDIT: lol ... wenn ich bei google 'delphi png layered' ( ohne Anführungszeichen ) suche, krieg ich den Thread hier an erster Stelle XD ... trifft sich gut ... ich hab mich zu dem Thema dumm und dämlich gesucht ... dabei war die Lösung jetzt so einfach >_<"
Angehängte Dateien
Dateityp: rar fake_vista_211.rar (296,4 KB, 156x aufgerufen)
  Mit Zitat antworten Zitat