IP-Adresse konvertieren/"verschlüsseln"

[marabu]

Schaut euch mal die OH hierzu an:

Delphi-Quellcode:

uses
  WinSock,
  SysUtils;
var
  s, s1, s2: string;
  c1, c2: cardinal;
begin
  s := '127.0.0.1';
  c1 := Inet_Addr(PChar(s));
  c2 := htonl(c1);
  s1 := IntToHex(c1, 8);
  s2 := IntToHex(c2);
end;