Integers, Strings, booleans in BinärDaten converertieren

[Apollonius]

Natürlich geht das ohne TStream. Und für Wertetypen und statische Arrays, also alles, was kein Zeiger ist, ist das auch ganz einfach:

Delphi-Quellcode:

var IntVar: Integer; Bytes: TBinaryObject;
begin
SetLength(Bytes, SizeOf(IntVar));
Move(IntVar, Bytes[0]);
end;

Und das war es auch schon. Das ist absolut keine Hexerei.

Zitat:

dieser besteht nur aus bytes.

Alles besteht aus Bytes. Du musst dir vor Augen halten, dass alles nur eine Bytefolge ist. Alles andere ist Interpretation! Im Prinzip kannst du dir deine Konvertierungsfunktionen also schenken. Für Strings und dynamische Array funktioniert es genauso wie für Wertetypen, du musst bei Move eben immer das erste Byte als ersten Parameter angeben (bei Strings z.B. s[1]) und bei SetLength die richtige Größe angeben (nicht die mit SizeOf erhaltene).