Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#5

AW: Index für 2-dimensionale Arrayproperty

  Alt 29. Jan 2012, 02:13
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.
  Mit Zitat antworten Zitat