1

我将我的 DBrichView(格式化对齐)保存在数据库中,我需要在快速报告中打印。
我使用“TRichView wrapper (RVQRControls) v3.0 for QuickReport”,tQrDBRichview,但它没有显示格式化的文本,也显示了不同的字体。

var
  sds1: TSQLDataSet;
  dsp1: TDataSetProvider;
  cds1: TClientDataSet;
  qrp1: TQuickRep;
  qrbDetailBand1: TQRBand;
  qrDBRvw1: TQRDBRichView;

  ...     
  with sds1 do
  begin
    CommandText := 
      'select  a.id_anot,  a.text,  a.cod_user from  anot a where  a.id_ANOT = 1977';   
  end;
  with dsp1 do
  begin
    Name := 'dsp1';
    DataSet := sds1;
  end;
  with cds1 do
  begin
    Name := 'cds1';
    ProviderName := 'dsp1';
  end;
  with qrp1 do
  begin
    Name := 'qrp1';
    DataSet := cds1;        
  end;
  with qrbDetailBand1 do
  begin
    Name := 'qrbDetailBand1';
    Parent := qrp1;
    BandType := rbDetail;
  end;      
  with qrDBRvw1 do
  begin
    Name := 'qrDBRvw1';
    Parent := qrbDetailBand1;
    NoMargins := True;
    DataField := 'TEXTO';
    DataSet := cds1;
  end;
  ...

我如何解决这个问题?

4

0 回答 0