потоки; ошибка инди; значения for в edit

[gamer123]

for i:=1 to Memo1.count do
begin
load:=IdHTTP1.Get(Memo1.Lines[i]+'/eshe-shto-to.html');
if Pos('нужная надпись', load)<>0 then Memo2.Lines.Add(Memo1.Lines[i]);
end;

1. подскажите как дополнить этот код чтобы ошибки инди при битом урле (404,302,304, 301 и т.д.) не появлялись а просто пропускал урл.

2. Есть один поток, чтобы добавить второй поток нужно еще один класс создавать или как?

3. Цикл for i:= 0 to 10 do begin, хотелось бы сделать чтобы значние ОТ и ДО можно было указывать в edit. На форме будут 2 едита, но как их прицепить туда?
Глупости типа for 'Edit1.Text' to 'Edit2.Text' do begin не пашут

[chertovich]

  for i := StrToInt(Edit1.Text) to StarToInt(Edit2.Text) do
  begin
    try
      load:=IdHTTP1.Get(Memo1.Lines[i]+'/eshe-shto-to.html');
      if Pos('нужная надпись', load) <> 0 then
        Memo2.Lines.Add(Memo1.Lines[i]);
    except
    end;

  end;

[gamer123]

а как лечится ошибка socket error 10060? Везду пишут что это превышен таймаут, а как сделать чтобы работе программы не мешало?

Еще вылазит ошибка 'invalid code page', тоже надобы чтобы просто игнорило и работало дальше

[aRise]

ответ тебе уже написали выше. это вариант на любой эксепшн
в блоке except-end делай обработку эксепшнов (если надо).