Problemas con consulta sql y fecha

[Vales08]

Buenas tardes, tengo un problema y necesito que me ayuden... Tengo el siguiente codigo y me gustaria que me digan si encuentran el error..

Código Delphi [-]
with (DM.Q_agen_tur )do
  begin
   SQL.Clear;
   SQL.Text:='select * from AGENDAS_TURNOS, PROFESIONALES '+
           'where AGENDAS_TURNOS.FECHA= ' + 'fecha'+
           'and PROFESIONALES.APELLIDO_Y_NOMBRE= ' + QuotedStr(prof_agen_turno.Text)+
           'and PROFESIONALES.ID_PROF = AGENDAS_TURNOS.ID_PROF ';
   ParamByName('fecha').AsDate:=fecha_turno.Date;
   Open;
  end;

El problema esta en el parametro 'fecha'...

Gracias de antemano...