Einzelnen Beitrag anzeigen

TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.070 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: Direct2D.Canvas in einer Bitmap speichern

  Alt 30. Mär 2023, 12:24
Hast du mein Beispiel denn irgendwie verändert? Funktioniert es denn so wie es ist bei dir in einer VCL-Form?
Du hast bspw. hier ein Semikolon nach MappedRect.bits drin
NumberOfScanLinesCopied := SetDIBits(VCLBitmap.Canvas.Handle, VCLBitmap.Handle, 0, VCLBitmap.Height, MappedRect.bits; BitmapInfo, DIB_RGB_COLORS); 0 zurück...
, daher scheint mir die Zeile für den Forumseditor schonmal einfach abgeschrieben, anstatt kopiert worden zu sein.

Die Exception-Meldung ist zu generisch, das kann von VCLBitmap.Handle, über VCLBitmap.Height bis zu ungültigen Zeiger in MappedRect.bits oder leeres unausgefülltes BitmapInfo alles sein.
Siehst du denn einen schwarzen Hintergrund mit roten Rechteck und blauen Rand und einer gelben Linie von links oben nach rechts unten auf den D2DCanvas/Rendertarget im Formular?

Geändert von TiGü (30. Mär 2023 um 12:32 Uhr)
  Mit Zitat antworten Zitat