Code/Schleife extrem langsam

[hoika]

Hallo,

das kannst du ohne Profiler auch selbst heraus bekommen


Original:

Delphi-Quellcode:

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)))));

ListBox-Problem ?

Delphi-Quellcode:

for I := ntohl(inet_addr(PAnsiChar(AnsiString(edit1.text)))) to
           ntohl(inet_addr(PAnsiChar(AnsiString(edit2.text)))) do
begin
end;

inet_ntoa-Problem ?

Delphi-Quellcode:

for I := ntohl(inet_addr(PAnsiChar(AnsiString(edit1.text)))) to
           ntohl(inet_addr(PAnsiChar(AnsiString(edit2.text)))) do
begin
  listbox1.items.Add('1'(;
end;

usw.



Heiko