Wie sieht es denn aktuell aus, wenn du schreibst du hast es geändert?
Delphi-Quellcode:
GetObject(Background.Handle, SizeOf(Bmp), @Bmp);
size := Bmp.bmWidth * Bmp.bmHeight * Bmp.bmBitsPixel;
PpixelDataArr := SafeArrayCreateVector(VT_UI1, 0, size);
PpixelDataArr.cDims := 2;
PpixelDataArr.cbElements := 1;
PpixelDataArr.fFeatures := 0;
PpixelDataArr.cLocks := 0;
PpixelDataArr.pvData := Bmp.bmBits;
PpixelDataArr.rgsabound[0].lLbound := 0;
PpixelDataArr.rgsabound[0].cElements := Bmp.bmWidth;
Hab das Temporäre gelöscht dann kann mir das casten sparen..
Aber funktioniert trotzdem nicht.. Ich vermisse das PixelArray innerhalb des SafeArray
Versteh die Technik wohl nicht die dahinter steckt.
gruss