Index für 2-dimensionale Arrayproperty

[sx2008]

Zitat von Pangea:

Das ich dort nur einen Wert angeben kann ist wirklich schade Vor allem da die mathematische Lösung bei größeren Zahlen nicht mehr funktioniert.

Wozu brauchst du das denn?
Ist dir klar, wozu man das Schlüsselwort "index" überhaupt benützt?
In dem Beispiel werden 5 Properties auf die gleiche Get-Funktion umgebogen.

Delphi-Quellcode:

TTestClass = class
private
  function GetSomething(index: integer): integer;
public
  property SpeedX: integer index 1 read GetSomething;
  property SpeedY: integer index 2 read GetSomething;
  property PositionX: integer index 3 read GetSomething;
  property PositionY: integer index 4 read GetSomething;
  property Acceleration: integer index 5 read GetSomething;
end;

Mal angenommen das vermisste Sprachfeature würde es geben, dann sähe der Code so aus:

Delphi-Quellcode:

TTestClass = class
private
  function GetSomething(index1, index2: integer): integer;
public
  property SpeedX: integer index 1,0 read GetSomething;
  property SpeedY: integer index 1,1 read GetSomething;
  property PositionX: integer index 2,0 read GetSomething;
  property PositionY: integer index 2,1 read GetSomething;
  property AccelerationX: integer index 3,0 read GetSomething;
end;

Wäre es erlaubt so zu programmieren, täte man sich damit aber keinen Gefallen weil diese Deklaration total unübersichtlich wird.