TStringList als Property

[DeddyH]

Ohne das jetzt ausprobiert zu haben: genügt nicht eine ReadOnly-Property, da man die Instanz ja nicht verändern möchte, sondern nur ihre Methoden aufrufen?

Delphi-Quellcode:

type
  TMyType = class(TPersistent)
  private
    FMyStringList: TStrings;
  public
    constructor Create(Owner: TComponent);override;
    destructor Destroy;override;
    property MyStringList: TStrings read FMyStringList;
  end;

constructor TMyType.Create(Owner: TComponent);
begin
  inherited;
  FMyStringList := TStringList.Create;
end;

destructor TMyType.Destroy;
begin
  FMyStringList.Free;
  inherited;
end;

Nur dahergetippt, daher ohne Gewähr.