Moin Moon,
mal ein Beispiel:
Delphi-Quellcode:
type
TMyObject = class(TObject)
private
FslLines : TStringList;
public
constructor Create;
destructor Destroy; override;
property Lines : TStringList read FslLines;
end;
implementation
{$R *.DFM}
constructor TMyObject.Create;
begin
inherited;
FslLines := TStringList.Create;
end;
destructor TMyObject.Destroy;
begin
FreeAndNil(FslLines);
inherited;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
mo : TMyObject;
begin
mo := TMyObject.Create;
try
mo.Lines.Add('TEXT');
ShowMessage(mo.Lines[mo.Lines.Count-1]);
finally
FreeAndNil(mo);
end;
end;
Das wäre jetzt ein Objekt, dass eine Eigenschaft Lines hat, die wiederum vom Typ TStringList ist.
Lines kann alle Methoden und Eigenschaften der Klasse TStringList verwenden.
Die müsstest Du also nicht selber implementieren.