en modo Dise~o selecciona tu adoquery y en el Inspector de objetos, en propiedades, busca la propedad que dice SQL(Text) dale a los "..." y en el cuadro que aparece pon algo como
Select * From myTabla y en tu codigo agregale otra linea.
Código Delphi
[-]adoquery2.SQL.Clear; adoquery2.SQL.Text:='SELECT aulas.aul_codigo,presto_.fecha_prestamo FROM (aulas INNER JOIN presto_ ON aulas.aul_codigo =
presto_.cod_aul)WHERE aulas.aul_codigo = ' + quotedstr(aula_dia.Text)+ '
and '+ quotedstr(dia_hora1.Text) + ' >= presto_.hora_entrada and '+
quotedstr(dia_hora2.Text)+' <= presto_.hora_salida and
presto_.fecha_prestamo = '+quotedstr(datetostr(fecha_dia.Date));