Eine Klasse -> binär

18/04/2011 - 14:49 von Heinz-Mario Frühbeis | Report spam
Hallo!

Was mir vorschwebt:

Dim C as Class1
Set C = New Class1
Diese Variable möchte ich nun in eine Binàr-Datei schreiben und wieder
zur Klasse auslesen.

Geht das überhaupt? Und wenn ja, wie könnte das aussehen?

Mit Gruß
Heinz-Mario Frühbeis
 

Lesen sie die antworten

#1 G.Wietzorek
18/04/2011 - 17:18 | Warnen spam
Am 18.04.2011 14:49, schrieb Heinz-Mario Frühbeis:
Hallo!

Was mir vorschwebt:

Dim C as Class1
Set C = New Class1
Diese Variable möchte ich nun in eine Binàr-Datei schreiben und wieder
zur Klasse auslesen.

Geht das überhaupt? Und wenn ja, wie könnte das aussehen?

Mit Gruß
Heinz-Mario Frühbeis





Du kannst der Klasse eine SaveContent und LoadContent Methode verpassen
;-) und sich selbst speichern und wiederherstellen lassen...

Public sub SaveContent(filenum as long [ , filepos as long])
Public sub LoadContent(filenum as long [, filepos as long])

Sicher kennst Du die WriteProperties und ReadProperties
Ereignisfunktionen von Steuerelementen. In den o.a. Methoden kannst Du
die Eigenschaften ebenso serialisieren bzw. zurückladen.

In der SaveContent Methode erstellst Du beispielsweise ein PropertyBag
Objekt, weist diesem die Eigenschaftswerte zu und speicherst dann die
.Content Eigenschaft (binàres Byte Array) (hoffe mal aus dem Gedàchtnis,
die heißt so, sonst schlag's nach). In der LoadContent Methode làdst Du
die Binàrdaten und weist diese der .Content Eigenschaft eines neuen
Propertybags zu und kannst die gespeicherten Eigenschaften dann der
Klasse wieder zuweisen.

Gert

"Probleme kann man niemals mit derselben Denkweise lösen, durch die sie
entstanden sind."
Albert Einstein

Ähnliche fragen