Bitmap transparent aus TImageList holen

[amigage]

Sorry @EWeiss. Deinen Sourcecode habe ich nicht wirklich wahrgenommen.
Den werde ich mir natürlich einmal anschauen, denn genau das möchte ich, dass die Grafiken in der Imagelist zur Laufzeit transparent gesetzt werden.

[EWeiss]

Hatte gerade etwas zeit.
In der ImageList befinden sich Bitmaps in 24Bit Format. Ohne Transparenz\Alpha.

gruss

[amigage]

Hallo und danke für den Quellcode.

Leider hilft mir das nicht 100%ig weiter. Wie oben beschrieben, benötige ich die Grafiken in einem Listview, der die Images über den ImageIndex steuert.

In Deinem Beispiel, wird der Inhalt der ImageList in eine BMP und PNG Datei gespeichert, wobei letztere dann in ein TImage geladen wird.

Erstens, wäre die Lösung über einen MemoryStream eleganter, aber eine solche Funktion scheint es wohl nicht in GDI zu geben?
Und wie bringe ich dann die transparente Grafik in den Listview?

[EWeiss]

Zitat:

In Deinem Beispiel, wird der Inhalt der ImageList in eine BMP und PNG Datei gespeichert

Ja um zu dokumentieren das der Inhalt vom ImageList Transparent ist.

Du kannst auf das speichern verzichten und anschließend direkt die Images aus der ImageList laden.
Die sind zu diesen Zeitpunkt Transparent.

Ein bisschen musst du auch selber machen

gruss

[amigage]

Du hast Recht, es funktioniert
Also, erst die ImageList transparent setzen lassen und dann ganz normal die Listview füllen.
Jetzt habe ich es verstanden. Sorry, wenn ich dich aufgrund meiner Unwissenheit genervt haben sollte

[EWeiss]

Zitat von amigage:

Du hast Recht, es funktioniert
Also, erst die ImageList transparent setzen lassen und dann ganz normal die Listview füllen.
Jetzt habe ich es verstanden.

Na da bin ich ja froh! Und hoffe das jetzt alles Transparent ist.

Zitat:

Sorry, wenn ich dich aufgrund meiner Unwissenheit genervt haben sollte

Kein Problem.

Zitat:

Erstens, wäre die Lösung über einen MemoryStream eleganter, aber eine solche Funktion scheint es wohl nicht in GDI zu geben?

Du meinst wohl GDI+ und klar gibt es das..

Delphi-Quellcode:

  function TGPBitmap.FromStream(stream: IStream; useEmbeddedColorManagement: BOOL = FALSE): TGPBitmap;
  begin
    result := TGPBitmap.Create(
        stream,
        useEmbeddedColorManagement
    );
  end;

Natürlich musst du dann den Stream vorher erst erstellen!
Informiere dich deshalb mal im INet.
Sorry ist mir jetzt zu viel Aufwand weil ich an meinem eigenen Projekt am Arbeiten bin.

PS:
Was ich dir noch mitgeben kann..

Delphi-Quellcode:

GdipLoadImageFromStream
GdipCreateBitmapFromStream > sollte damit gleichzusetzen sein. TGPBitmap.FromStream

gruss