inkompatibel TArray<Integer> Pointer

[EWeiss]

Zitat:

Du hast kein Tarray<Integer>

Klar habe ich eins.

meta: TArray<Integer>;

und so geht's.

Delphi-Quellcode:

    meta := @pXY;
    SetLength(meta, ArraySize * 2);

    x1 := meta[0];
    y1 := meta[1];
    x2 := meta[(ArraySize * 2) - 2];
    y2 := meta[(ArraySize * 2) - 1];

    C := 0;
    for K := 0 to (ArraySize - 1) do
    begin
      x1 := min(x1, meta[C]);
      x2 := max(x2, meta[C]);
      inc(C);

      y1 := min(y1, meta[C]);
      y2 := max(y2, meta[C]);
      inc(C);
    end;

gruss