T trident99 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-05 #1 我的数据源是excel表格,用stringgrid显示excel中的内容 。可以用quickreport打印吗???
Y yj_119 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-05 #2 可以的,在Quickreport的OnNeeddata事件中判断Stringgrid的行数
G grwriter Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-05 #5 试试Grid++Report,例子 PrintDBGrid 就是专门实现 DBGrid 的打印, 去 http://www.rubylong.cn 下载
Y yj_119 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-06 #6 不一定什么都用3方控件的啊。 procedure TForm6.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean); begin if i <= form1.stringgrid1.RowCount - 1 then moredata := true else moredata := false ; end;
不一定什么都用3方控件的啊。 procedure TForm6.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean); begin if i <= form1.stringgrid1.RowCount - 1 then moredata := true else moredata := false ; end;
Y yj_119 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-06 #7 procedure TForm6.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin QRLabel1.Caption := form1.stringgrdi1.Cells[0,i] ; inc(i); end;
procedure TForm6.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin QRLabel1.Caption := form1.stringgrdi1.Cells[0,i] ; inc(i); end;
Y yj_119 Unregistered / Unconfirmed GUEST, unregistred user! 2006-06-07 #10 ^_^可以的,这种方法我们都用多少各项目了,和正常的预览方法是一样的,你试试