PNG und Canvas via BMP und anderes

[creehawk]

Moin Moin.

Ich komme der Sache näher. Habe im Netz eine dicke WIC Beschreibung gefunden (WindowsImagingComponent), und experimentiere da mal mit rum.

Sollte ich das hinkriegen sage ich Bescheid. Denn BMP mit Transparenz ist - so scheint es - ein vielgefragtes Problem.

creehawk

[jaenicke]

Zitat von creehawk:

Ich komme der Sache näher. Habe im Netz eine dicke WIC Beschreibung gefunden (WindowsImagingComponent), und experimentiere da mal mit rum.

Sollte ich das hinkriegen sage ich Bescheid. Denn BMP mit Transparenz ist - so scheint es - ein vielgefragtes Problem.

Auf das es sehr einfache Antworten gibt. Ich habe bereits geschrieben, dass es passende FMX Funktionalität gibt. Und WIC gibt es auch bereits in Delphi als TWICImage.

Natürlich ist das Thema sicherlich spannend und es spricht nichts dagegen, selbst das Rad neu zu erfinden, aber wenn du einfach eine Lösung suchst, ist das unnötig.

Da du es selbst offenbar nicht angeschaut hast, liegt im Anhang ein Beispiel für ein VCL Projekt, das einen Teil eines PNG Bildes in ein neues PNG kopiert und speichert. Danach werden beide transparent in einem TImage angezeigt.

[creehawk]

Moin Moin.

@jaenicke
Erstmal vielen Dank für dein Beispiel.
Da Rad neu erfinden will ich eigentlich nicht. Aber verstehen was da wie abgeht.

Erstmal muss ich lernen was denn eigentlich die Elemente einer Grafik sind, die Formate und deren Bestandteile. PNG, DDS, JPG, BMP.

Das dauert eine Weile. Und wenn ich hier im Forum was frage gibt's ja immer Antworten, aus denen ich Denkanstösse oder Hinweise "sauge".

Was ich wollte habe ich ja hoffentlich soweit verständlich gesagt ganz am Anfang. Dachte ich. Jedenfalls hat mein erstes "Studium" der Zusammenhänge ergeben, das ein optisch perfektes PNG mit transparenten Hintergrund oft nicht so richtig transparent ist, da sind mitunter noch weitere Layerangaben versteckt, die bloss nicht angezeigt werden. Aber sobald man daraus dann ein BMP mit transparentem Hintergrund machen will kommen die Sachen zum Vorschein. Siehe die erste Post.

Wie auch immer, ich befasse mich jetzt ja mal mit den Möglichkeiten der TWicImage, denn da kann ich auch die in vielen Spielen vorkommenden DDS verarzten.

Aber nochmal Danke an alle die geantwortet haben.

creehawk

[jaenicke]

Zitat von creehawk:

Was ich wollte habe ich ja hoffentlich soweit verständlich gesagt ganz am Anfang. Dachte ich.

Einen Bereich aus einer PNG kopieren und speichern. Genau das macht mein Beispiel und zwar nicht als Bitmap sondern wieder als PNG mit Transparenz.

Zitat von creehawk:

Jedenfalls hat mein erstes "Studium" der Zusammenhänge ergeben, das ein optisch perfektes PNG mit transparenten Hintergrund oft nicht so richtig transparent ist, da sind mitunter noch weitere Layerangaben versteckt, die bloss nicht angezeigt werden.

Das nennt sich Alphakanal. Der legt fest, "wie transparent" ein bestimmter Bereich ist. Du kannst also auch einen Bereich der PNG fast komplett transparent machen, einen anderen aber gar nicht transparent.

Bitmaps kennen auch einen Alphakanal, aber in der VCL ist der nicht implementiert. Dort wird eine transparente Farbe verwendet, so dass Halbtransparenzen usw. nicht möglich sind.

Deshalb habe ich ja auch vorgeschlagen, dass du, wie in meinem Beispiel, die FMX-Units dafür verwendest. Dann brauchst du keine zusätzlichen Bibliotheken, kannst also mit Bordmitteln gut damit arbeiten. Anzeigen kannst du in der VCL auch PNGs gut. Nur müssen es dafür halt weiter PNGs sein und keine konvertierten Bitmaps.

[Jens01]

@creehawk
Hast Du mal Graphics32 oder TImage32 ausprobiert.
Die müßten eigentlich das können, was hier diskutiert wird. Bei Gaphics32 braucht man noch irgendeinen Konverter für PNGs.
Aber beide haben ein "TImage", das einen Teil Deiner Arbeit machen sollte.

[Redeemer]

Zitat von creehawk:

Canvas geht meines Wissens ja nur mit Bitmap.

Da ist dein Wissen falsch. Canvas geht mit TMetafileCanvas (ziemlich spezielles Ding) und insbesondere auch TPngImage.
Daher ist in tomkupitz' Lösung auch das Schreiben von Scanline unnötig - CopyRect tut's auch. Alpha muss aber meines Wissens immer noch per Scanline.

[Michael II]

Delphi-Quellcode:

procedure PngToBmp32( p : TPngImage; b : TBitMap );
begin
   b.PixelFormat := pf32Bit;
   b.AlphaFormat := afDefined;
   b.Assign(p);
end;

...ist etwas einfacher und du hast dadurch auch eine ARGB Bitmap.
Probleme gibt's halt bei 32 Bit in VCL (wie bereits früher hier beschrieben) bei der Bearbeitung der Bitmap via VCL Grafikmethoden wie copyrect, rectangle etc., weil Delphi VCL in diesem Bereich im letzten Jahrtausend stehen geblieben ist.

Wenn du zum Beispiel eine ARGB Bitmap via VCL canvas.savetofile() speicherst, dann ruft Delphi TBitmap.WriteStream für (FImage.FDIB.dsBMIh.biBitCount = 32) and (FAlphaFormat = afDefined) die Prozedur UnPreMultiplyAlpha auf. U.a. wegen solchem Code (Aufrufe von UnPreMultiplyAlpha oder PreMultiplyAlpha zu Unzeiten) entstehen die falschen Farben, welche in #1 beschrieben werden.

Deshalb:
Bei einfacheren Problemen (wie copyrect Funktionalität für ARGB BitMap) kann man via BitBlt, AlphaBlend, TransparentBlt viel tun.
(graphics32 und FMX sind unnötig für einfache Kopierfunktionen von rechteckigen ARGB Bereichen.)

Wenn du komplexere Dinge anzeigen willst (zum Beispiel Bewegung, Alphakanal Malfarbe), dann würde ich dafür Windows Graphics32 verwenden (extrem performant) und wenn's nicht nur Windows sein muss FMX (Beispiel siehe #12). Ich weiss nicht wie gut FMX heute ist. In den Anfängen waren viele Dinge sehr umständlich programmiert. Aber heutige Prozessoren fressen solche Probleme ja durch Power und mit Energieverschwendung weg.

Wenn du deine App in Massen via Web verteilst ist bei der Wahl graphics32, FMX etc. eventuell auch die Grösse der .exe ein Faktor.

WICImage wurde hier erwähnt. Ich sehe nicht, wie dies beim Bearbeiten von ARGB Bildern helfen kann. Fürs Laden und Speichern ist es aber echt cool.
Weiss hier jemand wie man mit Delphis VCL TWICImage eine ARGB Bitmap als .BMP speichern kann (Bitmap als .PNG speichern funktioniert problemlos und ist sicher in den allermeisten Fällen eh sinnvoller)? Damit der korrekte ARGB BMP Header geschrieben wird müsste man für .BMP via IWICBitmapFrameEncode, IPropertyBag2 EnableV5Header32bppBGRA=1 setzen - wenn jemand Code hat, dann gern .
(Mich interessiert hier nur TWICImage; dass es durch direktes Schreiben des BMP Headers gut geht, weiss ich.)

[Michael II]

Hallo creehawk,

hier noch ein Beispiel, wie du mit TWICImage eine png Datei laden und als png, bmp, gif, tiff, jpeg abspeichern kannst. Weiter: ...wie du eine .png Datei in eine Bitmap laden kannst ...wie du bei gegebenem .png File einen Teil rauskopieren (dein Problem) und den kopierten Teil als .png abspeichern kannst. ...wie du eine ARGB Bitmap inklusive Transparenz abspeichern kannst.

[Redeemer]

Zitat von Michael II:

WICImage wurde hier erwähnt. Ich sehe nicht, wie dies beim Bearbeiten von ARGB Bildern helfen kann. Fürs Laden und Speichern ist es aber echt cool.
Weiss hier jemand wie man mit Delphis VCL TWICImage eine ARGB Bitmap als .BMP speichern kann (Bitmap als .PNG speichern funktioniert problemlos und ist sicher in den allermeisten Fällen eh sinnvoller)? Damit der korrekte ARGB BMP Header geschrieben wird müsste man für .BMP via IWICBitmapFrameEncode, IPropertyBag2 EnableV5Header32bppBGRA=1 setzen - wenn jemand Code hat, dann gern .
(Mich interessiert hier nur TWICImage; dass es durch direktes Schreiben des BMP Headers gut geht, weiss ich.)

Also ich krieg TWICImage nicht dazu, BGRA-Bitmaps zu laden. Also laden schon, nur ohne Alpha. Egal ob per Bitfields oder implizit. Ich nutze daher PNG.

[Michael II]

Zitat von Redeemer:

Also ich krieg TWICImage nicht dazu, BGRA-Bitmaps zu laden. Also laden schon, nur ohne Alpha. Egal ob per Bitfields oder implizit. Ich nutze daher PNG.

In den meisten Fällen wird man wohl eh als PNG speichern und von PNG laden wollen (File kleiner und Decodieren/Encodieren heute extrem schnell).

Ich kann aber mit WICImage (ohne irgendwas anzupassen) in Delphi 11.2 problemlos ARGB Bitmaps laden. Alphakanal ist mit dabei. Welche Delphi Version verwendest du?
Leider fügt Delphi beim Speichern von ARGBs mit TWICImage nicht automatisch den boolean Variant EnableV5Header32bppBGRA=1/TRUE hinzu und speichert deshalb nur RGB. Deshalb noch einmal meine Frage: Weiss jemand wie man gewünschte Eigenschaften in den Bag einpackt?

Beim Speichern von ARGB Bitmaps schreibt man TBitmapFileHeader, TBitmapV5Header, Bilddaten selbst und gut ist.