Hi,
Ich habe mir folgenden Code gebastelt, um eine Reihe von
IP-Adressen zu generieren.
Es funktioniert, aber die Schleife läuft extrem langsam.
z.B die Generierung von 127.0.0.1 - 127.0.0.254 dauert einige Sekunden!
Woran könnte das liegen?
Delphi-Quellcode:
var
I: Integer;
begin
for I := ntohl(inet_addr(PAnsiChar(AnsiString(edit1.text)))) to
ntohl(inet_addr(PAnsiChar(AnsiString(edit2.text)))) do
listbox1.items.Add(string(inet_ntoa(TInAddr(htonl(I)))));
end;