|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.542 Beiträge
Delphi 11 Alexandria
|
Re: Umwandlung charkombination nach integer
2. Sep 2009, 19:56
Wenn es nicht mehr als 4 Buchstaben sein sollen, kommst Du mit DWORD aus.
Delphi-Quellcode:
Zahl := Ord(Buchstabe1) shl 24 or Ord(Buchstabe2) shl 16 or Ord(Buchstabe3) shl 8 or Ord(Buchstabe4);
//umgekehrt:
Buchstabe1 := Chr(Zahl shr 24);
Buchstabe2 := Chr(Zahl shr 16 and $000000FF);
Buchstabe3 := Chr(Zahl shr 8 and $000000FF);
Buchstabe4 := Chr(Zahl and $000000FF);
Wieder aus dem Kopf 
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|