que te parece si en el qreport en lugar de colocar el campo direccion colocas un "label"
y en el beforeprint la pregunta
pseudocodigo:
Código Delphi
[-]if dm.direccionReal = '' then
lblDireccion.caption := dm.DireccionAuxiliar
else
lblDireccion.caption := dm.DireccionReal