根据条件循环使用以下动态创建TQRDBText的代码procedure TForm1.Button1Click(Sender: TObject);
var
  myQRDBText:TQRDBText;
begin
  myQRDBText:=TQRDBText.Create(self.QRBand1);
  myQRDBText.Parent:=self.QRBand1;
  myQRDBText.Left:=0;  myQRDBText.Top:=0;
  myQRDBText.Width:=70;
  myQRDBText.Height:=30;
  myQRDBText.caption:='abc';
  myQRDBText.dataset:=mydataset;
  mydataset.active:=true;
  QuickRep1.preview;end;

解决方案 »

  1.   

    你所说的这个我都明白,我的意思是在让用户设置一些打印参数的窗口中怎么样动态的把需要打印的字段的选项(如“是否打印”复选按钮,“对齐方式”,"高度"文本框动态显示出来,由于每次打印字段都不一样(要打印的字段可能在所有字段中,但也可能不在所有字段中,既所有字段可增可减,是不是说的有点复杂),这样动态显示好象很麻烦,如果预先把所有要打印的字段都放在窗口中的话,那就不是”动态“的了),显示在窗口中,而不是根据用户选择动态生成打印的一些控件(QRband)
      

  2.   

    quickrep自身的限制,这样做很难
    除非你自己写打印代码
    单还是要更新QUICKREP
      

  3.   

    我认为打印不应该由用户控制,可根据窗体的dbgrid的内容或query的sql语句生成各种不同的打印预览以供打印.