Question

delphi中如何调用Excel来显示和打印报表?

Answer 1

比来正在做一个项目，我做个中的一部分：您好请问 用Delphi实现与长途SQL Server数据库连接，调用别人作好的数据库表，在客户端实现报表的浏览和打印。请求： 1。把很多多少表集中打印在一张纸上， 2。请求调用Excel显示和打印，表格美不雅。 1。用单文档界面（SDI)可以吗？ 2。若何调用Excel来显示和打印？我初学delphi, 欲望可以或许获得您的指导，感谢！

Answer 2

感谢各位的答复！今朝我又碰到一个问题，请看我的源代码：procedure TForm1.BtnCreateTableClick(Sender: TObject);var sheet:variant; Template:OleVariant;begin ExcelApplication1.Connect; ExcelApplication1.Visible[0]:=true; Template:=Emptyparam; ExcelApplication1.Workbooks.Add(Template,0); begin sheet:=ExcelApplication1.Workbooks[1].Worksheets[1];...... sheet.Name:='调剂日报表'; with Table1 do begin First; j:=1; for i:=0 to Fieldcount-1 do sheet.cells[j,i+1]:=Fields[i].AsString; While Not EOF do j:=j+1; Next; end;end; i,j:Integer;......这段代码实现

Answer 3

具体怎么蟠竺，看delphi自带的例程VCL-->server页-->TExcelApplication+TExcelWorkBook+TExcelWorkSheet