Bitmap transparent aus TImageList holen

[EWeiss]

Zitat:

Zitat von Sherlock (Beitrag 1426619)

Ahja, tut mir Leid, falscher Begriff. Wo soll die Bitmap schlußendlich angezeigt werden? Ein TImage kann auch PNG, und TSpeedButton ebenso. Ich will eigentlich nur sagen: es werden endlich "moderne" Bilddatentypen unterstützt. Warum nicht nutzen?

Sherlock

Das Image oder Bitmap wird transparent ins ImageList kopiert (gezeichnet) danach kannst du die ImageList weiterhin auf normalem weg benutzen ohne dazwischen irgend etwas konvertieren zu müssen.
Der einzige unterschied ist halt das dann der Bildstrip (Ist ja nur ein einzelnes Bitmap in der ImageList) transparent ist.

btw. Die beste Methode ist natürlich die ImageList direkt mit dem korrekten Format zu befüllen in dem fall wie du schon sagst *.png
Bin mir nur nicht sicher ob das von der IDE (Resourcen Editor) unterstützt wird.

gruss

[Sherlock]

Zitat:

Zitat von EWeiss (Beitrag 1426620)

btw. Die beste Methode ist natürlich die ImageList direkt mit dem korrekten Format zu befüllen in dem fall wie du schon sagst *.png
Bin mir nur nicht sicher ob das von der IDE (Resourcen Editor) unterstützt wird.

Der Kollege amigage setzt Rio ein, und das unterstützt PNGs in ImageListen.

Sherlock

[EWeiss]

Zitat:

Zitat von Sherlock (Beitrag 1426624)

Zitat:

Zitat von EWeiss (Beitrag 1426620)

btw. Die beste Methode ist natürlich die ImageList direkt mit dem korrekten Format zu befüllen in dem fall wie du schon sagst *.png
Bin mir nur nicht sicher ob das von der IDE (Resourcen Editor) unterstützt wird.

Der Kollege amigage setzt Rio ein, und das unterstützt PNGs in ImageListen.

Sherlock

Ok, dann gebe ich dir recht soll einfach *.png verwenden und gut ist.
Diese alternative sollte aber bei D7 und Delphi Versionen funktionieren wo *.png Nicht mit dem Ressourcen Editor addiert werden können.

gruss

[amigage]

Zitat:

Zitat von peterbelow (Beitrag 1426607)

Versuch nicht, die Bitmap aus der Imagelist zu holen

Muss ich aber, weil ich die die Grafiken eigentlich in einem Listview verwenden will. Das mit dem Button war erst einmal ein Test, die Grafiken generell transparent zu bekommen.

Mein eigentliches Anliegen ist folgendes:
Der Anwender soll als "Customizing" im Programm seine eigenen Symbole auswählen können, die in einem Listview als grafische Unterstützung einer Ordnerstruktur angezeigt werden sollen. Jedem Eintrag soll eine spezielle Grafik zugewiesen werden können.

Die ausgewählten Grafiken werden in einer Imagelist abgelegt und am Ende in einem Stream als Datei gespeichert, mitsamt anderer Daten, die verwendet werden.

Beim nächsten Start soll dieser Stream wieder geladen werden, und die einzelnen Grafiken in der Imagelist eingefügt werden. Anhand des ImageIndex wird die Grafik im Listview angezeigt.

Das funktioniert soweit auch ganz gut, bis auf die Transparenz! Die geht verloren.

Zum Laden verwende ich

Delphi-Quellcode:

TBitmap.CreateFromStream(IconStream);

wobei

Delphi-Quellcode:

IconStream : TMemoryStream;

definiert ist. Und dann übergebe ich die gelesenen Grafiken der Imagelist, wobei

Delphi-Quellcode:

TIconData(IconList[i]).Icon

die Grafik beinhaltet:

Delphi-Quellcode:

for i := 0 to IconList.Count - 1 do
begin
   ii := ImageListLeft32.AddMasked(TIconData(IconList[i]).Icon, clFuchsia);
   ImageListLeft32.Draw(Canvas, 0, 0, ii);
end;

Vielleicht ist mein Ansatz auch grundlegend falsch und ich müsste es anders angehen.
Für einen Tipp wäre ich dankbar.

[EWeiss]

Zitat:

Für einen Tipp wäre ich dankbar.

Habe dir Tips gegeben wenn diese nicht reichen sorry mehr geht nicht!

Du verstehst einfach nicht das in RIO die Bitmaps nicht transparent abgelegt werden das musst du selbst tun.
Wie das geht habe ich gezeigt.

Verstehe nicht was da so schwer ist das umzusetzen.
Ok bin raus ;)

gruss

[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 :thumb:
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 :wink: