"array of TRGBQuad" aus "TBitmap"?

[Wusel]

Hallo allemiteinander :)

Hat einer von euch ne Ahnung, wie ich aus einem TBitmap die rohen Bilddaten in ein array von TRGBQuad's bekomme?


Wusel

[neolithos]

In deinem Fall am besten gar nicht!
So was brauchst du jene

Das Bitmap in ein 24bit Bitmap umwandeln.
Und via TBitmap.Scanline auf die Daten zugreifen. Bei DIB's sind die Daten blank im Speicher abgebildet man brauch nur den Offset der Bilddaten/Zeilen und die solltest du schon berechnen können.

Diesen Offset weist man einfachhalber auf folgendes Array so

Delphi-Quellcode:

type
  PRGBQuadArray = ^TRGBQuadArray;
  TRGBQuadArray = packed array [0..0] of TRGBQuad;

var pLine : PRGBQuadArray; // hier muss der Offset die Zeile drauf

[Muetze1]

Moin!

Ähm, sicher? Wenn die Pixel mit einem TRGBQuad angesprochen werden, dann stimme ich dafür, vorher die PixelFormat Eigenschaft auf pf32bit zu setzen anstatt 24 Bit...

MfG
Muetze1