[inspector]

спасибо, сделал немного по-другому

Код:

s:= TStringlist.create;
s1:=edt1.Text;
s.Delimiter:='.';
s.DelimitedText:=s1;

теперь айпи разберу, есть другая проблема - получение количества компьютеров в локальной сети, просто число и ничего больше.