Einzelnen Beitrag anzeigen

Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.429 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Array Properties

  Alt 25. Okt 2022, 16:27
Im Normalfall würde man kein Array sondern eher eine TObjektList verwenden:
Delphi-Quellcode:
type
  TAndereKlasseList = TObjectList<TAndereKlasse>;

  TMeineKlasse1 = class(TObject)
  private
    FItems: TAndereKlasseList;
  public
    property Items: TAndereKlasseList read FItems; default; {default: statt MeineKlasse.Items[i] kann man direkt MeineKlasse[i] schreiben}
    constructor Create;
    destructor Destroy; override;
  end;

implementation

constructor TMeineKlasse1.Create;
begin
  inherited;
  FItems := TAndereKlasseList.Create;
end;

destructor TMeineKlasse1.Destroy;
begin
  FItems.Free;
  inherited;
end;
  Mit Zitat antworten Zitat