Object in XML Speichern

[Martin W]

Hi an alle :-)

Delphi-Quellcode:

type
  TServerProfile = class(TObject)
    FName     : string;
    FPassword : string;
  end;

  TSingleServer = class(TObject)
    FName     : string;
    FHost     : string;
    FPort     : integer;
    FPassword : string;
    FComment  : string;
    FProfiles : array of TServerProfile;
  end;

  TServerList = class(TObject)
    FServers : array of TSingleServer;
  end;

var
  Servers: TServerList;

Wie kann ich das ganze sinnvoll speichern und wieder laden ? In .net geht es mit Hilfe von ner XML Serialisiserung... wie geht es unter Win32 ???

Gibt es unter Win32 vergleichbares??


Gruß
Martin

[edit=Admin]Beitrag auf Wunsch des Autors editiert. Mfg, Daniel[/edit]

[arbu man]

Du könntest da was mit Typeinfo machen wie man die propertys auflistet wird hier beschrieben

[Martin W]

Was .net ähnlich gibt es net?? Da waren es 4 Zeilen Code die ich brauchte...

[Khabarakh]

Es geht weder so einfach noch so schön, aber es geht.

• Leite alle zu serialisierenden Klassen von TComponent ab.
• Füge für alle zu serialiserenden Felder published Properties ein (*schüttel*).
• Deine Arrays musst du dafür AFAIK mit TCollections ersetzen.
• Read/WriteComponentRes oder TStream.Read/WriteComponent

@arbu man: Wäre eine Möglichkeit :stupid: ...

[edit]
Und XML ist es auch nicht.
[/edit]

[Martin W]

Aber was vergleichbares gibt es nicht??? :wiejetzt:


Kann ich eine DLL in .net schreiben und dann mit der Win32 Anwendung das Object übergeben?

[Khabarakh]

Soo schlecht ist doch die RTTI-Serialisierung auch wieder nicht :gruebel: .

Deine Idee ist allerdings zum Scheitern verurteilt. Selbst wenn du das Objekt über irgendwelche COM-Umwege in den managed Code bringen würdest, hättest du keinen Zugriff auf die Felder.

[Martin W]

Zitat:

* Leite alle zu serialisierenden Klassen von TComponent ab.
* Füge für alle zu serialiserenden Felder published Properties ein (*schüttel*).
* Deine Arrays musst du dafür AFAIK mit TCollections ersetzen.
* Read/WriteComponentRes oder TStream.Read/WriteComponent

Könnte mir einer dafür nen Beispiel geben? Also Source Code...

[sh17]

Ich würde eine Helper-Klasse mit 2 statischen Metoden bauen, die das übergebene Objekt in XML schreibt und wieder ausliest (in Datei, Stream, ...).

[Khabarakh]

Zitat:

Zitat von sh17

Ich würde eine Helper-Klasse mit 2 statischen Metoden bauen, die das übergebene Objekt in XML schreibt und wieder ausliest (in Datei, Stream, ...).

Nicht gerade das, was man unter einer generischen Lösung versteht...

@Martin W: Wo hakt es denn genau?
Wenn deine Klasse fertig ist, musst du im einfachsten Falle nur noch

Delphi-Quellcode:

WriteComponentRes(myObject, ...);

aufrufen.
Für die Collections kannst du dir auch mal die DP-Collection anschauen.

[sh17]

Zitat:

Zitat von Khabarakh

Nicht gerade das, was man unter einer generischen Lösung versteht...

dafür fexibel und eine Möglichkeit, wenn man nicht von TComponent erben kann. Zumal man XML wenigstens noch lesen kann.