Delphi Umwandlung charkombination nach integer

Thema durchsuchen

Ansicht

Themen-Optionen

Umwandlung charkombination nach integer

Ein Thema von qwertz543221 · begonnen am 2. Sep 2009 · letzter Beitrag vom 4. Sep 2009

Vorheriger Beitrag

Nächster Beitrag

DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.666 Beiträge

Delphi 12 Athens

Re: Umwandlung charkombination nach integer

2. Sep 2009, 19:56

Wenn es nicht mehr als 4 Buchstaben sein sollen, kommst Du mit DWORD aus.

markieren

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