Hi,
Ich habe im Moment folgendes:
Delphi-Quellcode:
type
TDawnColor = packed record
case Integer of
0: (Value: Cardinal);
1: (R, G, B, A: Byte);
end;
TDawnPixels = Array of Array of TDawnColor;
var
Fpixels: TDawnPixels;
data: Array of Cardinal;
begin
//
SetLength(data,FWidth*FHeight);
Move(FPixels[0],data[0],SizeOf(Cardinal)*FWidth*FHeight);
//
end;
Jedoch werden die Daten nachweislich nicht richtig übertragen. Wenn ich das ganze male kommt etwas schwares dabei raus mit ein paar bunten pünktchen dazwischen. Es müsste eigentlich eine einfarbige Fläche sein..
FPixels[0,0] oder FPixels statt FPixels[0] hab ich schon getestet, bringt aber nicht wirklich was...
Gruß
Neutral General
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."