怎样打印dbgrid中的内容（delphi）? 大侠请帮忙，小妹先行谢过了！

yudu 2002-12-01 11:33:31

哪位大侠请救命。

...全文

32 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

ihihonline 2002-12-01

打赏
举报

QucikRep.DataSet := DBGrid.Source.DataSet;
DetailBand1.DataSet := DBGrid.Source.DataSet;
QRDBText1.DataSet := DBGrid.Source.DataSet;
QRDBText1.DataField := DBGrid.Source.DataSet.FieldName;
QRDBText1.Parent := DetailBand1;
////当然，你也可以用其它的Band;
代码不直观，窗体文件最直观；

ihihonline 2002-12-01

打赏
举报

我给你贴点代码，稍等

ihihonline 2002-12-01

打赏
举报

变量；

yudu 2002-12-01

打赏
举报

ihihonline(小小->爱被下载中……) :
i,J代表什么意思？能再清楚一点吗？

ihihonline 2002-12-01

打赏
举报

www.nxit.net/bbs 里有打印专题，如果你感兴趣的话，可以去看一看；

ihihonline 2002-12-01

打赏
举报

QuickRep.DataSet := DBGrid.DataSource.DataSet;
QuickRep.Component[I].DataSet ;= DBGrid.DataSource.DataSet;
QuickRep.Component[I].Control[J] .DataSet := DBGrid.DataSource.DataSet;
QuickRep.COmonent[I].COntrol[J].FieldName := DBGird.DataSource.Datat.FieldName;
QuickRep.PreView;
QuickRep.Print;