In SQL Anweisung Feld Inhalt abfragen lassen

[Robert_G]

Das Problem war, dass ich DateTime verwendet habe - für deine jetzige Tabelle müsste es Date sein.

Außerdem sollte die Tabelle 2 Datumsfelder enthalten: 1. ausgeliehen (StartDatum) 2.zurückgebracht(EndDatum) (beide mit Uhrzeit)
dann könnte es So aussehen:

Delphi-Quellcode:

Query2.Close;
Query2.SQL.Clear;
Query2.SQL.Text :=
   'SELECT *' + #10 +
   'FROM   "t:eDienstreisebuch\mainDB.dbf"' + #10 +
   'WHERE  Dienst_PKW = :iDienst_PKW AND' + #10 +
   '       (:iDate  between StartDatum AND EndDatum)';

Query2.prepare;
Query2.ParamByName('iDienst_PKW').AsString := Dienst_Pkw.text;
Query2.ParamByName('iDate').AsDateTime := DateT.DateTime;

Damit dürftest du die Probleme umgehen können, die weiter oben beschrieben habe...