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]