Delphi-PRAXiS - Delphi Overloaded Properties

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Overloaded Properties (https://www.delphipraxis.net/110180-overloaded-properties.html)

Overloaded Properties

guten tag!

Ist es irgendwie mögich ein porperty overlaoded zu machen habe es so probiert:

Delphi-Quellcode:

			  strict private

    FKosten : TDoubleArray;

    function GetKosten(AJahrTyp: TJahrTyp; AMonatIx: Integer): TDoubleArray;

    procedure SetKosten(AJahrIx: Integer; AMonatIx: Integer;  const AValue: Double);

  public

    property Kosten[AJahrTyp: TJahrTyp; AMonatIx: Integer]: TDoubleArray read GetKosten; default; overload;

    property Kosten[AJahrIx: Integer; AMonatIx: Integer]: Double write SetKosten; default; overload;

  end;

gibt aber diesen fehler :
E2169 Field definition not allowed after methods or properties

Kann ich dies irgenwie umgehen?

mfg roth

Re: Overloaded Properties

Ich würde erst mal in fremdem Sourcecode nachschauen, wie das dort gemacht wird.
Bestimmt findest Du in der VCL etliche Beispiele für Properties.

Ausserdem ist das nicht "Überladen", das Du machen willst.
Der Setter soll einfach andere Parameter haben als der Getter.
Es handelt sich um EINE Property.

Re: Overloaded Properties

Wie sieht TJahrTyp aus?
Afaik kann man keine Properties überladen.

Re: Overloaded Properties

Hallo roth,

streiche mal das "overload" in der Definition deiner Klasse:

klick

Gruß Hawkeye