Wenn ich jetzt nicht völlig blind bin, würde ich sagen, dass das ständige Öffnen und Schliessen des DataSet überflüssig ist.
Frank
EDIT:
Code:
if FileExists(path_canban) = True then
begin
AssignFile(F, path_canban);
Reset(F);
DSData.Close;
DSData.CommandText := 'Select * from fullload_data';
DSData.Open;
while not EoF(F) do
begin
Readln(F, zeile);
sl_zeile := Split(zeile,';', True); // ist nicht das Problem
Inc(counter);
try
DSData.Append;
DSData.FieldByName('lname').AsString := sl_zeile[0];
DSData.FieldByName('sachnr').AsString := sl_zeile[1];
..
DSData.Post;
Except
//
end;
end;
DSData.Close;
...