Thema: Delphi HEX nach DWORD umwandeln

Einzelnen Beitrag anzeigen

Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#1

HEX nach DWORD umwandeln

  Alt 8. Dez 2009, 22:44
Guten Abend,

ich möchte gerne IP Adressen sortieren. In einem anderen Thread hat man mir empfohlen, die IP Adressen erst in einen HEX Wert und dann in einen DWORD umzuwandeln.
Den 1. Schritt habe ich.
Delphi-Quellcode:
procedure Tfrm_main.btn_convertClick(Sender: TObject);
var
 sl: TStringList;
begin
 sl := Split(edt_ipaddress.Text, '.');

 // HEX Wert ermitteln
 lbl_hex.Caption := IntToHex(StrToInt(sl[0]), 2) + ' ' + IntToHex(StrToInt(sl[1]), 2) + ' ' + IntToHex(StrToInt(sl[2]), 2) + ' ' + IntToHex(StrToInt(sl[3]), 2);

 // DWORD Wert ermitteln

end;
Beispiel:
Zitat:
IP Adresse: 192.168.1.29
HEX Wert: C0 A8 01 1D
Leider habe ich keinen Plan wie man jetzt aus einem HEX Wert ein DWORD macht. Kann mir vielleicht einer auf die Sprünge helfen?
Vielen Dank im voraus.

Sven
  Mit Zitat antworten Zitat