Einzelnen Beitrag anzeigen

Benutzerbild von Grishnak
Grishnak

Registriert seit: 15. Sep 2005
Ort: Neu-Ulm
111 Beiträge
 
RAD-Studio 2009 Arc
 
#3

Re: Zahl aus TMemoryStream in Integer einlesen

  Alt 6. Okt 2005, 12:54
Ich denke, du machst nichts falsch! Meines Wissens nach, werden die einzelnen Bytes einer Integer-Variable derart gespeichert, dass das höchstwertigste Byte als letztes kommt. (Bei einem Dezimal-Wert z.B. 10356 würde das dann so aussehen: 65301).

Versuch mal:

Delphi-Quellcode:
var
  Wert: Longword;

[...]

Wert:=((Wert and $FF000000) ShR 24)+((Wert and $00FF0000) ShR 8)+((Wert and $0000FF00) ShL 8)+((Wert and $000000FF) ShL 24);
//Edit: Oops, zu langsam! Naja - trotzdem!
Mach' etwas idiotensicher und irgendjemand erfindet einen besseren Idioten!
  Mit Zitat antworten Zitat