Código Delphi [-]
if miQuery.FieldByName('CampoReserva').asString = 'R' Then
 ....
else if miQuery.FieldByName('CampoReserva').asString = 'R' Then
....

miQuery = Es el componente que utilizas para recuperar los datos de la consulta.
CampoReserva = es el campo que indica si la habitación está reservada.

por cierto, ¿que tipo de datos guarda el campo que indica si la habitación esta reservada o no?, es tipo string? o booleano?