Stringliste als Property funktioniert nicht

**idefix2**

Hallo,

ich habe eine Komponente von TStringgrid abgeleitet:

Delphi-Quellcode:

			  TfdStringGrid = class(TStringGrid)

  private

    FTest1: TStringList;

  public

    constructor Create (Sender: TComponent); override;

    procedure Datenzeigen;

  published

    property Test1: TStringList read FTest1 write FTest1;

  end;

Die beiden Methoden:

zusammenfalten · markieren

Delphi-Quellcode:

			constructor TfdStringGrid.Create (Sender: TComponent);

begin

inherited;

FTest1 := TStringList.Create;

Datenzeigen;

end;

procedure TfdStringGrid.Datenzeigen;

begin

showmessage ('Test1: '+FTest1.Text);

end;

Jetzt kann ich im Property Editor für Test1 irgend einen Wert eingeben und speichern (ohne eine Fehlermeldung auszulösen).
Wenn ich aber unmittelbar darauf noch einmal den Propertyeditor für Test1 aufrufen will (Doppelklick im Objektinspektor), kommt folgende Exception:
TFont kann nicht zu TRicheditstrings zugewiesen werden.

Danach spielt die IDE zunehmend verrückt. Der Versuch, nach dieser Fehlermeldung irgend etwas zu kompilieren, erzeugt mir die Exception:
Zugriffsverletzung bei Adresse 5003F3D2 im Modul 'rtl120.bpl'. Lesen von Adresse 00000001.

Stringliste als Property funktioniert nicht

Stringliste als Property funktioniert nicht

Forumregeln