dbf Tabelle per BatchMove füllen

[blutigerAnfänger]

Hallo DPler

Ich möchte eine dbf Tabelle per BatchMove mit Daten aus einer Tabulator-getrennten Quell Datei füllen.

Hier mein Ansatz:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
 with Table1 do
 begin
   Active := false;
   DataBaseName := 'C:\';
   TableName    := 'Quell.txt';
    TableType := ttASCII;
    Table1.Open;
  end;

 with Table2 do
 begin
   Active := false;
   DataBaseName := 'C:\';
   TableName    := 'Ziel.dbf';
    TableType := ttDbase;
  end;

    with Table2.FieldDefs do  //Benenne Tabellenfeld
    begin
      Clear;
      Add('Feld001', ftString, 50, false);
      Add('Feld002', ftString, 250, False);
    end;

    Table2.CreateTable;      //Erzeuge Tabelle

    Table2.BatchMove(Table1, batAppend);


Form1.Close;
end;

Leider preßt BatchMove alle Datensätze in ein Feld.

Also wie mache ich BatchMove begreiflich den Tabulator als Feldtrennzeichen zu verwenden.