Einzelnen Beitrag anzeigen

Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#6

AW: Von TStringList abgeleitete Klasse inkl. Objecten speichern

  Alt 9. Jul 2010, 02:29
TFileStream.WriteComponent() klappt leider auch nicht, weil ich meine Klasse nicht von TComponent abgeleitet habe...
Du musst gar nicht von TComponent ableiten! Es reicht auch, wenn du von TPersistent ableitest. Wenn das auch nicht geht, weil z.B. die Klasse schon einen anderen Vorfahren hat, kannst du immer noch per Compilerschalter die RTTI für deine Klasse aktivieren:
Delphi-Quellcode:
type
{$M+}
TMyClass = class(TObject)
private
  FX: integer;
published
  property X: integer read FX write FX;
  ...
end;
{$M-}
Du musst nur darauf achten, dass alles was gespeichert werden soll im published-Abschnitt steht.
  Mit Zitat antworten Zitat