Property via AsString;AsInteger;AsBoolean;.. laden

[-=ZGD=-]

So sieht es jetzt bei mir aus

Ich habe ein record über alle Einträge:

Delphi-Quellcode:

type
  RConfig = record
    Key: String;
    Value: String;
  end;

Daraus einen eigenen Typ, als dynamisches Array

Delphi-Quellcode:

type
  TConfigList = array of RConfig;

Welches Verwendung in der Klassendeklaration

Delphi-Quellcode:

type
  TConfig = class(TObject)
  private
    Con: TZConnection;
    Query: TZQuery;

    fNewDB: Boolean;

    fList: TConfigList;

    function GetValue(aID: String): String;
    procedure SetValue(aID: String; aValue: String = '');
    function getItemCount: Integer;
  public
    constructor create;

    property IsNew: Boolean read fNewDB;
    property Items[aKey: String]: String read GetValue write SetValue;
    property Count: Integer read getItemCount;
    procedure ReadConfig;
    function Exists(aKey: String): Boolean;
    function save: Boolean;
  end;

in der privaten Variable fList Anwendung findet.

Wie würde jetzt meine Deklaration aussehen, wenn ich die Items als Objekt handhaben möchte.

Meine Idee wäre dann

Delphi-Quellcode:

type
  TConfigItem = class(TObject)
  private
    function GetAsInteger: Integer;
    function GetAsString: String;
  public
    property AsInteger: Integer read GetAsInteger;
    property AsString: String read GetAsString;
  end;

Woraus sich ergeben würde, dass Items[aKey: String]: TConfigItem wird.
Allerdings mit welchem read ?