Ne in der 2. Zeile ist nicht jedes zweite Zeichen eine 0.
Du solltest direkt sagen welche Komponente du verwendest.
Durch googlen habe ich das gefunden, dass es sich um GDImage handelt.
--> Integer (Powebasic) = Short (Delphi)
sollte vom Datentyp also passen. Ob du aber jedes zweite Zeichen auf 0 setzen muss glaub ich nicht (das ist die Y-Koordinate)
Delphi-Quellcode:
TShortPoint = packed record
x: Short;
y: Short;
end;
TShortPointArr = array of TShortPoint;
// und dann
var
myarr: TShortPointArr;
begin
SetLengtH(myarr, ...);
//....
@myarr[0];