So, ich habe es jetzt mal umgesetzt.
Delphi-Quellcode:
procedure Tfrm_main.btn_convertClick(Sender: TObject);
var
sl: TStringList;
i : Integer;
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);
i:= StrToInt(lbl_hex.Caption);
// DWORD Wert ermitteln
lbl_dword.Caption := IntToStr(i);
end;
Beispiel
Code:
192.168.1.2 -> -> $c0a80102 -> -1062731518
Warum kommt da ein Minus?
In diesem Thread kommt bei generic ein anderer Wert heraus, warum?
VirtualStringTree: IP Adressen sortieren