ayuda con where anidado?

[maxi915]

Solucionado!

Código Delphi [-]
Procedure capturar_Turno (Queryturno:TADOQuery; horario:string; dia:string; var id_turno:Integer; var disponibilidad:Integer);

begin
  with Queryturno do
   begin
     SQL.Clear;
     SQL.Add('Select * From turnos Where horario='+QuotedStr(horario)+'and '+'dia=' +QuotedStr(dia));
     Open;
     id_turno:=FieldByName('Id_turno').AsInteger;
     disponibilidad:=FieldByName('disponibilidad').AsInteger;
   end;
end;