Wäre viel einfacher ^^
Delphi-Quellcode:
AString = IntToStr(a-1)+'.'+IntToStr(b-1)+'.'+IntToStr(c-1)+'.'+IntToStr(d-1)
Writeln(f,AString)
Wenn du den Zwischenstand haben willst, dann nimm z.B. eine globale Variable für
AString und lass dir den aktuellen Inhalt anzeigen. ( ShowMessage(AString); )
Vergiss aber nicht, irgendwo in der Schleife ein Application.ProcessMessages
(Nicht in der Innersten, am besten in der Zweiten oder Dritten).
So reagiert dein Programm auch noch während du deine 1337 h4x0r
IP-Li$t erstellst
(Zumal die StringList mindestes 4.294.967.296
IP-Adressen * 15 Bytes = 60GB Speicher verschlingen würde)