Schreib das, was Du machen willst, doch einfach mal in der Sprache Delphi (statt Deutsch) auf:
Delphi-Quellcode:
For i:=0 to MyIPList.Count -1 do begin
ExtractFromCode(MyIPList[i], IPAddress, UserName, Password)
If CanReachIP(IPAddress) then
MyStringList.Add(IPAddress+':'+UserName+':'+Password);
end;
Dann noch die beiden Methoden 'ExtractFromCode' und 'CanReachIP' schreiben.
ExtractFromCode nimmt einen String der Form
IP:User: Pass[...] und extrahiert
IP, User und Pass.
Sonderzeichen nach dem 'Pass' werden ignoriert.
CanReachIP prüft, op eine
IP-Adresse erreichbar ist und liefert True, sonst False. Optional könnte ein Logeintrag erzeugt werden.