PPoint zu short

[brechi]

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];