[droguerman]

Código Delphi [-]
qrLabel.caption := '';
for i:=0 to memo.lines.count-1 do
begin
  if qrLabel.caption<>'' then qrLabel.caption:= qrLabel.caption+#13;
  qrLabel.caption := qrLabel.caption + memo.lines[i];
end;

me olvidaba, asegurate que la propiedad wordwrap está en true aunque esto es por defecto