Найти свободные строки Delphi 7

[detalik]

обозначил переменные n1,n2,n3,n4 integer при компиляции пишет incompatible types TstringList and String и выделяет строку s:=format('%d.%d.%d.%d',[n1,n2,n3,n4]);. Помогите пожалуйста. Спасибо

[Serge_Bliznykov]

var
  MyList: TStringList;
  Index: Integer;
  n1, n2, n3, n4 : integer;
begin
  MyList := TStringList.Create;

  //  генерация списка IP для 192.168.110.10 - 192.168.110.255
  // не забудьте задать свой диапазон IP
  for n1:=192 to 192 do
     for n2:=168 to 168 do
       for n3:=110 to 110 do
         for n4:=10 to 255 do
     MyList.Append(format('%d.%d.%d.%d',[n1,n2,n3,n4]));


  MyList.Sort;   { Find will only work on sorted lists! }

[detalik]

Здравствуйте, не было возможности все это время зайти, но теперь зашел, все сделал, как сказали, спасибо огромное работает, все супер. Спасибо!