[Aleca]

Código Delphi [-]
procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
begin
  if QRDBText2.DataSet.FieldByName('NBRE_CAMPO').IsNull then
    QRDBText2.Height := 0;
  
  if QRDBText3.DataSet.FieldByName('NBRE_CAMPO').IsNull then
    QRDBText3.Height := 0
  else
    if QRDBText2.Height = 0 then
      QRDBText3.Top := QRDBText2.Top;
 
  QrBand1.Height := qrdbtext1.Height + qrdbtext2.Height + qrdbtext3.Height;
end;

espero q funcione, no lo alcance a probar.