Hmmm ich arbeite ja auch mit den Zeos-Komponenten für den Zugriff auf
mySQL. Ich würde es mal so versucben:
Delphi-Quellcode:
with query do
begin
Close;
SQL.text:= '
SELECT * FROM `arbeitszeit` WHERE (kundennummer = :kundennummer) AND (datum BETWEEN :datumvon AND :datumbis)';
ParamCheck:= true;
ParamByName('
kundennummer').AsString := querykunden.Fieldbyname('
kundennummer').AsString;
ParamByName('
datumvon').AsDate := DTPvon.date;
ParamByName('
datumbis').AsDate := DTPbis.date;
Open;
end;
Aber noch eine andere Frage: Warum speicherst Du die Kundennummer in der Arbeitszeittabelle? Besser wäre doch die ID (PrimaryKey) als Referenz zu verwenden.
Ach ja, ist die "Kundennummer" ein String oder nur eine Zahl? Wenn eine Zahl könntest Du natürlich auch .AsInteger als Übergabeformat benutzen.