poner negrita a algunas partes del texto en QRRichText

[ecfisa]

Hola Confucio.

Si te fuera posible saber la posición donde van los valores y sus monedas, se me ocurre que podrías usar un TRichEdit. Asignar los atributos a la porción de texto que desees, poner su propiedad Visible en False y luego asignar el TRichEdit a la propiedad ParentRichEdit del TQRRichText.

Te pongo un ejemplo de la idea:

Código Delphi [-]
...
implementation

var
  RE: TRichEdit;

procedure TForm1.Button1Click(Sender: TObject);
begin
  RE:= TRichEdit.Create(nil);
  RE.Visible:= False;
  RE.Parent:= Self;
  RE.Text:= 'PRUEBA DE TEXTO EN NEGRITA Y SUBRAYADO';
  // bold
  RE.SelStart:= Pos('NEGRITA',Re.Text)-1;
  RE.SelLength:= Length('NEGRITA');
  RE.SelAttributes.Style:= [fsBold];
  // Underline
  RE.SelStart:= Pos('SUBRAYADO',Re.Text)-1;
  RE.SelLength:= Length('SUBRAYADO');
  RE.SelAttributes.Style:= [fsUnderline];
  QRRichText1.ParentRichEdit:= RE;
  QuickRep1.Preview;
end;
...
procedure TForm1.FormDestroy(Sender: TObject);(Sender: TObject; var Action: TCloseAction);
begin
  if Assigned(RE) then
    RE.Free;
end;

Saludos.