insert into mit IBX und FB

[karolus]

Hallo DPler,

Ich will eine Paradox-Tabelle in eine FB-Tabelle einlesen. Beim Aufruf der eingefügten Routine erhalte ich den folgenden Fehler "Im Projekt BiblioDaten.exe ist eine Exception der Klasse EIBClientError mit der Meldung 'Feld "LfdNr" konnte nicht gefunden werden.' aufgetreten." Was mache ich falsch. Habe andere Routinen probiert, aber letztlich waren die Felder in der FB-Tabelle nicht vorhanden. Die Tabelle ist aber angelegt.
Jemand Hilfe für einen Neuling? Schon mal Danke vorab.

Gruß WE

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
     Form1.IBDataSet1.InsertSQL.Clear;
     Form1.IBDataSet1.InsertSQL.Add('Insert into RTitelAutor (LfdNr, TitelNr, UrheberNr) values (:LfdNr, :TitelNr, :UrheberNr)');
     Form1.IBDataSet1.Prepare;
     if Form1.IBDataSet1.Prepared then
          begin
               Form1.Table1.First;
               while not Form1.Table1.Eof do
               begin
                    Form1.IBDataSet1.ParamByName('LfdNr').AsInteger := Form1.Table1.FieldByName('LfdNr').AsInteger;
                    Form1.IBDataSet1.ParamByName('TitelNr').AsInteger := Form1.Table1.FieldByName('TitelNr').AsInteger;
                    Form1.IBDataSet1.ParamByName('UrheberNr').AsInteger := Form1.Table1.FieldByName('UrheberNr').AsInteger;
                    Form1.IBDataSet1.ExecSQL;
                    Form1.Table1.Next;
               end;
          end;
end;

[edit=MrSpock]Code-Tags eingefügt. Mfg, MrSpock[/edit]