Registriert seit: 26. Nov 2003
Ort: Lünen
1.932 Beiträge
Delphi 7 Enterprise
|
Re: [TBitmap32] - Transparent zeichnen
11. Dez 2007, 09:59
Ich sehe nirgends, dass du dem Bitmap mit der Tabelle einen Alphakanal zuweist, weswegen .Draw{To}() natürlich einfach alles zeichnet.
Die einfachste Methode bei dir wäre es, wenn du Pixelweise durch das Bitmap gehst, und bei jedem Pixel dass die Hintergrundfarbe hat, seinen Alphawert zu ändern. (Der ist das höchstwertige Byte in dem TColor32 (welcher nur ein 32 Bit Integer ist).)
dmBlend/cmBlend sind korrekt dafür.
Fabian K. INSERT INTO HandVonFreundin SELECT * FROM Himmel
|