Thema: Delphi Public Arrays in Klassen

Einzelnen Beitrag anzeigen

Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#2

Re: Public Arrays in Klassen

  Alt 28. Nov 2004, 14:38
Nach dieser Art:

Delphi-Quellcode:
type
 TArray = array of RCoordinates ;

 TCoordinates = class(TObject)
 private
   FCoordinates : TArray ;
   function GetCoordinates (Index : integer) : RCoordinates ;
 public
   property ACoordinates [index : integer] : TArray read GetCoordinates ;
 end ;

...

function TCoordinates.GetCoordinates (Index : integer) : RCoordinates ;
begin
      Result := FCoordinates[index] ;
end ;
  Mit Zitat antworten Zitat