Ohne die SaveArrays jetzt wirklich zu kennen: Wie ich das sehe, reicht es nicht einfach per
PpixelDataArr.pvData := Bmp.bmBits
die Daten zuweisen zu wollen. Ich würde hier
SafeArrayAccessData verwenden, um mir einen Zeiger auf die tatsächlichen Daten zu holen. Danach sollte ein
CopyMemory(PtrFromAccessDataAPI, Bmp.bmBits, size)
ausreichen, um die Daten zu kopieren. Abschließend aber
SafeArrayUnaccessData nicht vergessen.
Funktioniert leider nicht..
Danke..
Ich habe schon das Problem mit dem Header der kommt auch schon nicht an.
Delphi-Quellcode:
var
BitmapInfo : Pointer;
.....
BitmapStream.Position := 0;
Background.LoadFromStream(BitmapStream);
BitmapStream.Position := 0;
BitmapInfo := @BitmapInfoHeader;
SafeArrayAccessData(PbitmapInfoArr, BitmapInfo);
SafeArrayUnaccessData(PbitmapInfoArr);
Danach sende ich die Daten das Resultat siehe Anhang..
Na egal dauert halt seine zeit bis ich weis wie es funktioniert.
ops.. der falsche punkt im Anhang aber spielt keine rolle ist überall 0
gruss