[Asinkrit]

Я не вижу, где вы указываете имя базы данных. Если в дизайнере тогда вопросов нет. Проверьте правильность указания имени БД.

Код:

  For i:=0 to Table1.RecordCount-1 do

А вообще лучше так:

Код:

  ..
  with Table1 do
    begin  
    First;
    While not Table1.eof do
       begin
       ...
       Next;
       end;
    end;
  ..