Einzelnen Beitrag anzeigen

The_ New_Guy

Registriert seit: 9. Mai 2007
Ort: Ahlen(noch)
91 Beiträge
 
#1

Datenbank findet felder nicht . . .

  Alt 2. Jun 2007, 14:00
Datenbank: paradox • Version: 7 • Zugriff über: tquery
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?
Miniaturansicht angehängter Grafiken
d4_179.gif   desk3_204.gif  
  Mit Zitat antworten Zitat