Overloaded Properties

[roth]

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

[RavenIV]

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.

[mkinzler]

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

[Hawkeye219]

Hallo roth,

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

Gruß Hawkeye