Una alternativa a lo que te comenta Andres es definir el evento OnPrint del TQRDBText y cambiar el valor de salida por el que tu quieras
Código:
procedure TForm2.QRDBText1Print(sender: TObject; var Value: String);
begin
Value := '*' + Value + '*';
end;