Datenbank findet felder nicht . . .

[The_ New_Guy]

Hallo,
ich habe ein problem mit meiner datenbank bzw. mit diesem code:

Lasse ich diesen code laufen, wird immer wieder ein dbase error an folgender Stelle hervorgerufen . . .

Delphi-Quellcode:

query1.SQL.Clear;
query1.SQL.Add('Select * ' +
               'from etparams where ID = ' + inttostr(pagecontrol1.TabOrder));
query1.ExecSQL;

query1.Open;
query1.First;
if not query1.Eof then
begin                                            // funktion makebool macht aus 1 -> true und aus 0 -> false
  checkbox1.Checked := makebool(query1.fieldbyname('Cb1').asinteger);
  checkbox2.Checked := makebool(query1.fieldbyname('Cb2').asinteger);
  checkbox3.Checked := makebool(query1.fieldbyname('Cb3').asinteger);
//  checkbox4.Checked := makebool(query1.fieldbyname('Cb4').asinteger);  // vorher kam der fehler auch schon hier -
//  checkbox5.Checked := makebool(query1.fieldbyname('Cb5').asinteger);  // jetzt habe ich das auskomentiert
//  checkbox6.Checked := makebool(query1.fieldbyname('Cb6').asinteger);  // um weiterzusehen.
//  checkbox7.Checked := makebool(query1.fieldbyname('Cb7').asinteger);

  decodedate(query1.fieldbyname('dvon').AsDateTime,y,m,d);  //<--- hier kommt der fehler
  d1.Text := inttostr(d);
  m1.Text := inttostr(m);
  y1.Text := inttostr(y);

//. ...

woran kann das liegen?
ich habe alle Felder in meiner DB definiert, warum findet er sie trotzdem nicht?