Hai,
versuche es mal so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
with Query1
do
begin
Close;
SQL.Text := '
SELECT * FROM booking' +#10
+ '
WHERE (tag BETWEEN :tag1 AND :tag2)' + #10
+ '
WHERE (moat BETWEEN :monat AND :monat2)' + #10
+ '
WHERE (jahr BETWEEN :jahr1 AND :jahr2)' + #10
+ '
ORDER BY name, uhrzeit';
ParamCheck := True;
Params.ParamByName('
tag1').Value := Tag1;
Params.ParamByName('
tag2').Value := Tag2;
Params.ParamByName('
monat1').Value := Monat1
Params.ParamByName('
monat2').Value := Monat2
Params.ParamByName('
jahr1').Value := Jahr1
Params.ParamByName('
jahr2').Value := Jahr2;
Open;
end;
end;
P.S.: Ich denke Sakura meinte das die Tags nicht [ source] [ /source] heissen sondern [ delphi] [ /delphi] (Natürlich ohne die Leerzeichen)
Stephan B.
"Lasst den Gänsen ihre Füßchen"