Memo in ein TMemo speichern und wieder auslesen?

**Piro**

Guten Abend,

ich habe mir ein CLass gebaut, welches ich verwende um ein VirtualTreeView zu füllen (Beispiel aus dem virtuellen Stammtisch. Alles funktioniert auch wunderbar. Nur ein Memo bekomme ich nicht gespeichert bzw. nach dem Speichern sind die Daten nicht mehr da für das Memo.

Definition der Klasse:

markieren

Delphi-Quellcode:

			type

  TOSystemData = class

  private

    //

  public

    ...

    name      : String;

    comments  : TMemo;

    ...

  end;

Speichern der Memo Daten:

markieren

Delphi-Quellcode:

			...

 SystemData := TOSystemData.Create;

 with SystemData do

 begin

   name     := edt_system.Text;

   comments := memo_comments;

 end;  

 vst_system.AddChild(nil, SystemData);

...

Zugriff auf gespeicherte DAten:

markieren

Delphi-Quellcode:

			...

 SystemData      := TOSystemData(vst_system.GetNodeData(curNode)^);

 edt_system.Text := SystemData.name;

 memo_comments   := SystemData.comments;

Leider bleibt das Memo Feld auf dem Formular leer. Warum?

Memo in ein TMemo speichern und wieder auslesen?

Memo in ein TMemo speichern und wieder auslesen?

Forumregeln