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';
RE.SelStart:= Pos('NEGRITA',Re.Text)-1;
RE.SelLength:= Length('NEGRITA');
RE.SelAttributes.Style:= [fsBold];
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.