Hola amigo:
No se si conoces el componente TQrMemo, pero pienso que si te he entendido bien es lo que necesitas. En el puedes incluir todo el texto que quieras : QrMemo1.Text := <Tu texto> ó QrMemo1.Lines.Add(linea1)... etc... , poner las propiedades AutoSize = False para poner el ancho que determines y el AutoStrech = True. Esta ultima propiedad hace que la altura de la banda se dimensione dinamicamente en funcion de tu QrMemo. Acuerdate de limiarlo antes de iniciar la siguiente linea QrMemo.Lines.Clear ya que si no acumularias datos.
Espero que lo entiendas y que te sirva la idea.
Buen año para todos.