Delphi a SQL

Mam problem z wyszukiwanie po dacie wpisanej w zapytaniu z Sql

procedure TForm9.Button1Click(Sender: TObject);
begin
      query1.SQL.Clear;
      if button1.Caption='Raport dzienny' then
        begin
        query1.SQL.Text:='select * from Hotel where to_char(Do_kiedy, +#39+dd+#39)='+ #39+edit1.text+#39;
        query1.Open;
        end
end;

gdy dd wpisane jest tak 'dd' to wtedy występuje błąd kompilacji. Proby zastąpienia ASCII tez nic nie pomagają. Prosze pomóżcie!!!

Zrób z parametrem.
where DoKiedy = :Par1

Ustaw typ parametru na data i w programie .ParamByName('Par1').AsDateTime:=data;

Ja tak przynajmniej robię i działa