Chodzi o przyspieszenie wczytywania danych do bazy w MySQL. Stosując poniższy kod przy plikach zawierających 1 mln rekordów trwa to bardzo długo (gdzieś około 8 godzin). Czy jest jakaś inna metoda pozwalająca to przyspieszyć? Może podział na mniejsze pliki? Łączę się z bazą za pomocą ODBC. Może jest inne łącze szybsze?
AssignFile(TextF,'Plik.txt');
Reset(TextF);
for i:=IloscRekordow downto 1 do
begin
Readln(TextF,S);
P := Pos(';', S);
DanaWartosc := Copy(S, 1, P - 1);
Delete(S, 1, P);
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('INSERT INTO T_KliFiz (Modulo) VALUES ('+ DanaWartosc+')');
ADOQuery.ExecSQL;
Application.ProcessMessages;
end;