Доброго времени суток!

Мне необходимо в программе, написанной на Delphi, загрузить данные из файлика в таблицу Informix. При закачке данных в цикле уходит много времени, так как обрабатывается более 15 000 записей. Вроде как для этих целей можно использовать утилиту dbload, вот только не знаю, как ею пользоваться.

Подскажите, пожалуйста, как пользоваться утилитой dbload?

Заранее большое спасибо.

код загрузки в цикле
...
Dbf1.First;
While not Dbf1.Eof do
begin
quLoadData.SQL.Clear;
quLoadData.SQL.Text:= 'insert into provision_new_serv_main (поле1, поле2, поле3, поле4, поле5, поле6, поле7)'
+' values ('
+Dbf1.FieldByName('поле1').AsString+','
+''''+Dbf1.FieldByName('поле2').AsString+''','
+''''+Dbf1.FieldByName('поле3').AsString+''','
+''''+Dbf1.FieldByName('поле4').AsString+''','
+''''+Dbf1.FieldByName('поле6').AsString+''','
+''''+Dbf1.FieldByName('поле7').AsString+''''
+')';
quLoadData.ExecSQL;
Dbf1.Next;
end;
...

загрузка идет приблизительно 10-15 минут

Спасибо за совет.
Теперь загрузка идет быстрее. 17 335 записей загружаются около 3-х минут, при этом на чтение dbf файла уходит 1 секунда :)
Хотелось бы, чтобы данные загружались еще быстрее.
Преобразование данных dbf файла в unl файл происходит в программе также за 1 с.
код
...
Var Buffer: string;
ListOut: TStringList;
...
While not Dbf1.Eof do
begin
Buffer:= Dbf1.FieldByName('поле1').AsString + '|' +
Dbf1.FieldByName('поле2').AsString + '|' +
Dbf1.FieldByName('поле3').AsString + '|' +
Dbf1.FieldByName('поле4').AsString + '|' +
Dbf1.FieldByName('поле5').AsString + '|' +
Dbf1.FieldByName('поле6').AsString + '|';
ListOut.Add(Buffer);
Dbf1.Next;
end;
ListOut.SaveToFile(UnlPath + 'file.unl');

и я думаю, что если есть возможность использовать утилиту dbload, то при ее использовании данные из файла формата unl в таблицу Informix будут загружаться быстрее :) (уверенности в этом нет, но попробовать можно было бы)