Hallo zusammen,
ich bastel gerade mit einem VST an einer Baumstruktur, in der verschiedene Objekte an Nodes angehängt sind. In etwa so:
Delphi-Quellcode:
type
TKnotenTyp = (ktAll, ktEx);
type
TDatObjAll = class(TObject) // <- gibt es hier einen besseren Vorfahr als TObject??
private
Zahl1: integer;
String1: string;
String2: string;
end;
type
TDatObjEx = class(TDatObjAll)
private
String3: string;
end;
type
PDat = ^TDat;
TDat = record
KnotenTyp: TKnotenTyp;
FObject: TObject; // hier dann entweder TDatObjAll oder TDatObjEx
end;
Klappt soweit auch ganz gut.
Die Frage ist nun, ob es was geeigneteres als TDatObjAll = class(TObject)
gibt, daß man beim Speichern und Lesen des Nodes von Datei
(Ereignisse:
Delphi-Quellcode:
procedure VSTSaveNode(Sender: TBaseVirtualTree; Node: PVirtualNode; Stream: TStream);
procedure VSTLoadNode(Sender: TBaseVirtualTree; Node: PVirtualNode; Stream: TStream);
)
Das ganze Objekt à la .SaveTostream bzw .LoadFromStream abhandeln kann.
Gibt es da eine geeignete Klasse?