Wie kann ich ein TBitMap transparent zeichnen?
Das hier funktioniert nicht. Der weiße Hintergrund bleibt weiß.



Zuerst hatte ich es mit TextOut probiert, aber da malt er mir einen noch hässlicheren Hintergrund; außerdem kann ich nur eine Schriftgröße benutzen.

TransparentColor hat nach der Zuweisung irgendeinen Wert, nur nicht den, den ich zugewiesen habe. (Tatsächlich ist der Wert zu groß um eine Farbe zu repräsentieren)

Welches Pixelformat hat denn dein Bitmap? Evtl. musst du das erst auf pf32bit umstellen damit die Transparenz überhaupt ausgewertet wird.

_________________
www.SaschaWillems.de | GitHub | Twitter | GPU Datenbanken (Vulkan, GL, GLES)

pfDevice. aber mit pf32bit wird’s nicht besser. Das Bild enthält keine Transparenz, deswegen setze ich ja TransparentColor (bzw weil ich eben noch nicht wusste, dass TBitmap ein 32 bit Format hat).

ps: ich habe geschaut, was TBitMap macht. Dass die TransparentColor falsch war kommt daher, dass er bei getTransparentColor am Ende ein or $02000000 dranhängt. Abgesehen davon bin ich daraus aber nicht schlau geworden.

Soweit ich weiss, ist ein Bitmap für Transparenz ungeeignet. Versuch mal folgendes:

Der transparente Pixel müsste laut Online-Hilfe der linke untere sein. Hab das aber nicht getestet.

Viele Grüße

Nein, funktioniert so auch nicht.

Versuch mal, bei der Paintbox die Transparenz einzustellen.
Ich glaube, dass die Transparenz bei einem Bild sich nur auf die bildmanipulierende (darauf Zeichnen) Routinen Auswirkung hat..

_________________
...GOD is wearing black...

Es gibt kein TPaintBox.Transparent

Ich habs mal getestet, und bei mir funktionierts einwandfrei, sowohl in Delphi als auch in Lazarus. Hier mal eine kleine Erweiterung:

Bescheib doch bitte ein bisschen genauer, was nicht funktioniert, sonst artet das in Raterei aus, und Dein Problem wird bestimmt nicht gelöst.

Benutzt Du Delphi oder Lazarus und welche Version? Wird das Bitmap z.B. bei meinem Beispiel gar nicht dargestellt oder lediglich die Transparenz nicht? Hast Du darauf geachtet, dass die Transparenz über den linken unteren Pixel festgelegt wird? Der linke obere Pixel hat übrigens die Koordinaten Pixels[0,0]. Die Zählung beginnt bei 0. Vielleicht liegt auch da der Fehler. Ich weiss schließlich nicht, wie Dein Bitmap aussieht.

Viele Grüße

Delphi 7
Das Bitmap enthält schwarzen Text auf weißem Hintergrund. Ob es nun den links oberen oder den links unteren Pixel als Transparent definiert oder ich die Farbe des zweiten Pixels nehme macht keinen Unterschied, die sind alle weiß. Dargestellt wird sowohl der Text (erwünscht) als auch der Hintergrund (unerwünscht). Was dein Beispiel angeht, erkenne ich schlicht keinen Unterschied zu dem was ich mache (außer dass du einen OpenDialog benutzt, aber das File, das ich lade, existiert (und wird korrekt geladen), und dass du die PaintBox blau füllst, während ich hier den Großteil meiner Zeichenroutine ausgespart habe).

Der Unterschied ist, dass ich TPicture statt TBitmap verwende. Dachte, dass das vielleicht einen Unterschied macht.
Bei mir funktioniert Dein Beispiel auch in Delphi2005 und in Lazarus.

EDIT:
Versuch doch mal, das Pixelformat nach dem Laden auf pf24Bit umzustellen. Das muss ich immer machen, wenn ich Bitmaps mit Scanline bearbeiten will.

Viele Grüße

sharkman: Dein Code läuft so bei mir mit Delphi 7, auch wenn ich clWhite oder $00ffffff nutze. Irgendwelche Units inkludiert die das Fensterdesign und somit die Transparenz beeinflussen könnten (sehr weit dahingesponnen, aber könnte ja sein) ? Erstelle doch mal ein Testprojekt, dann weiß man wo man anpacken muss.

_________________
Meine Musik: spiker-music.net

.BrushStyle := bsClear;

Danke, funktioniert so. (behält zwar einen unschönen weißen Rand, aber das liegt an den Daten)