export from DOA to paradox.db

[Andrey Maximenko. Ukraine]

I want to export from DOA to paradox.db
Now I have:

while not OracleQuery1.Eof do begin
  Table1.Append;
  for i := 0 to Table1.fields.Count-1 do begin
    Table1.Fields[i].Value := OracleQuery1.Field(i);
  end;
  Table1.Post;
  OracleQuery1.Next;

But this code works too slow.
-----------------------------------------
TBachMove works with TBDEDataSet only.
------------------------------------------
Has anybody other idea?

 

[Marco Kalter]

It depends what the performance bottleneck is. Is it Oracle or is it Paradox? If it is Oracle, then what is the SQL statement of the query?

 

[Andrey Maximenko. Ukraine]

very slow this code:

Table1.Append;  for i := 0 to Table1.fields.Count-1 do begin    Table1.Fields[i].Value := OracleQuery1.Field(i);  end;  Table1.Post;

 

[Marco Kalter]

Which part of this code is slow? The Append? The loop? The Post (where the record goes to paradox)?