Einzelnen Beitrag anzeigen

B3ta

Registriert seit: 21. Nov 2014
9 Beiträge
 
Delphi 7 Personal
 
#5

AW: Umwandlung von 4 Bytes in 1 LongWord (Stichwort MD5)

  Alt 9. Jan 2015, 21:56
oder mathematisch

MeinInteger := Ord(Buchstabe1) + Ord(Buchstabe2) * 256 + Ord(Buchstabe3) * 65536 + Ord(Buchstabe4) * 16777216;

oder binär

MeinInteger := Ord(Buchstabe1) or Ord(Buchstabe2) shl 8 or Ord(Buchstabe3) shl 16 or Ord(Buchstabe4) shl 24;

oder mit Pointer und casten

oder ...
Danke, so eine Mathematische Umsetzung habe ich gesucht!
Allerdings kurze Anmerkung, Müsste man nicht Mit Buchstabe 4 anfangen und dann am ende Buchstabe1 mit 16777216 multiplizieren, weil der ja (okay, das ist zugegebenermaßen ansichtssache) am weitesten Links steht?

Lg. B3ta
  Mit Zitat antworten Zitat