Deserialisierung von einem Integer-Wert

[amoibos]

Hallo,
ich habe erfolgreich elementare Datentypen serialisiert, nun möchte ich diese wieder auslesen. Dabei gehe ich über den Weg wie Delphi selbst seine Daten im Speicher ablegt(Delphi mag Big Endian). Nun habe ich folgendes Snippet:

Code:

 
s: string[4];
int: integer absolute s;

//Testfall s = 00 00 12 34
s := copy(Data, DataPosition, sizeof(Integer)); 
int := PInteger(@s)^;

Dies liefert mir statt $1234 301989892. Ich habe keine Ahnung was da schiefläuft. s beiinhaltet den korrekten String nur macht er in der letzten Zeile was anders als gedacht..

[Uwe Raabe]

Zitat von amoibos:

(Delphi mag Big Endian)

Seit wann denn das?

[amoibos]

Vielleicht noch ein Zusatz um Nebenschauplätze zu schließen, die implizite Konvertierung findet ja bereits schon beim Kopiervorgang des Strings nach s statt. Folglich liefert die letzte Anweisung das gleiche fehlerhafte Ergebnis.

[Uwe Raabe]

Das kann so nicht funktionieren.

Ein string[4] in Delphi 5 stellt eine Speicherstruktur von 5 Byte dar - 1 für die Länge und vier Byte für die Daten. Aus dem Copy entsteht in s ein String der Länge 4 mit dem Inhalt "00 00 12 34". Der Speicherbereich sieht also so aus: 04 00 00 12 34

Du castest einen Pointer auf s in einen PInteger. Damit werden die ersten 4 Bytes des Bereichs als Integer (übrigens Little Endian) interpretiert. 04 00 00 12 entspricht somit $12000004 = 301989892.

[Neutral General]

Mal ne andere Frage... Warum nicht einfach per IntToStr und StrToInt serialisieren/deserialisieren?
Dein seltsames Konstrukt ist doch viel zu kompliziert/überflüssig.

[Zoot]

Zitat von Uwe Raabe:

Das kann so nicht funktionieren.

Ein string[4] in Delphi 5 stellt eine Speicherstruktur von 5 Byte dar - 1 für die Länge und vier Byte für die Daten. Aus dem Copy entsteht in s ein String der Länge 4 mit dem Inhalt "00 00 12 34". Der Speicherbereich sieht also so aus: 04 00 00 12 34

Du castest einen Pointer auf s in einen PInteger. Damit werden die ersten 4 Bytes des Bereichs als Integer (übrigens Little Endian) interpretiert. 04 00 00 12 entspricht somit $12000004 = 301989892.

Erschwerend kommt hinzu, dass die Ziffern "1234" nicht etwa einem Speicherinhalt von 1234 entsprechen.

[Neutral General]

Zitat von Zoot:

Erschwerend kommt hinzu, dass die Ziffern "1234" nicht etwa einem Speicherinhalt von 1234 entsprechen.

Nach dem was er berichtet scheint sein String tatsächlich aus zwei #00, #$12 und einem #$34 aufgebaut zu sein. (Sonst käme bei ihm nicht 301989892 raus - siehe Post(s) von Uwe Raabe)
Inwiefern das dann serialisiert ist frag ich mich dann allerdings auch