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:
Delphi-Quellcode:
type
TOSystemData = class
private
//
public
...
name : String;
comments : TMemo;
...
end;
Speichern der Memo Daten:
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:
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?