Properties überladen?

[Hawkeye219]

Hallo Richard,

für die Default-Eigenschaft wird es von Delphi inzwischen direkt unterstützt:

Delphi-Quellcode:

type
  TMyList = Class
  Private
    Root: TMyListenEintrag;
    function GetEintrag (const Index: integer): TMyListenEintrag; overload;
    function GetEintrag (const Name: string): TMyListenEintrag; overload;
  public
    property Items [const Index: integer]: TMyListenEintrag read GetEintrag; default;
    property Items [const Name: string]: TMyListenEintrag read GetEintrag; default;
  end;

Wenn es sich nicht um die Default-Eigenschaft handelt, mußt du einen kleinen Umweg in Kauf nehmen.

Gruß Hawkeye