Aja, ¿y qué es lo que has intentado? En principio no parece difícil, sólo tienes que armar tu consulta SQL estableciendo los criterios de búsqueda:
Código SQL
[-]
select * from habitaciones
where tipo_habitacion = :tipo and fecha = :fecha
Entonces, al momento de hacer la consulta sustituyes los parámetros:
Código Delphi
[-]
Query.ParamByName('tipo').AsInteger := ComboTipoHabitacion.ItemIndex;
Query.ParamByName('fecha').AsDate := DateTimePicker.Date;
Query.Open;
// Saludos