Einzelnen Beitrag anzeigen

Benutzerbild von little_budda
little_budda

Registriert seit: 5. Mai 2006
Ort: Velbert
246 Beiträge
 
Delphi 2006 Professional
 
#1

TPicture füllen aus TImageList mit Transparenz

  Alt 24. Jan 2009, 11:41
Hallo,

ich verwende eine ImageList als Bildspeicher und mehrere Image-Komponenten als Ziele in denen ich die Bilder austausche.
In der Imagelist sind 4 Grafiken mit einer Kantenlänge von 24px und weißem Hintergrund.
Ich verwende folgenden Code zum Laden der Bildes
Delphi-Quellcode:
  ImageListDriverImages.GetBitmap(1, img_drv_01.Picture.Bitmap);
  img_drv_01.Transparent := true;
Das Laden der Bilder klappt einwandfrei.
Hierzu aber zwei Fragen.

1. Nach dem Laden des Bildes ist der ist der "weiße Teil" des Bildes nicht transparent.
Wenn ich das Bild von Hand einfüge klappt die Transparenz einwandfrei.
In der ImageList habe ich die korrekte Tranzparenzfarbe angegeben.
2. Wenn ich zum zweiten mal bei diesem Bild ankomme funktioniert die Transparenz
da man Teile des alten Bildes noch sehen kann.

Vielleicht hat ja jemend einen Tipp für mich.

Gruß Holger.
Holger
Glück findet sich nicht im Code
Gefahren werden ist nur solange schön wie man selbst nicht lenken möchte ...
  Mit Zitat antworten Zitat