delphi 把表格控件的内容转出到Excel
2017-11-16 09:31
357 查看
delphi 把表格控件的内容转出到Excel需要使用ExcelApplication控件
范例如下
范例如下
Var I,K,m:Integer; ExcelID: Variant ; begin ExcelApplication1.Connect; ExcelID :=CreateOleObject('Excel.Application') ; ExcelID.Visible :=False ; ExcelID.Caption :='应用程序调用 Microsoft Excel' ; ExcelID.WorkBooks.Open('C:\我的报表模板.xlsx' ); With dbgrdh1.DataSource.DataSet Do begin DisableControls; First; K:=0 ; while not eof do begin m:=0; for i:=0 to Fields.Count-1 do begin //这里把Excel表格的内容设置为delphi表格的内容,如:ExcelID.cells[K+4,i+1-m].value :=FieldByName(Fields[I].FieldName).Text; end; K:=K+1 ; next; end; EnableControls; end; ExcelID.ActiveWorkBook.SaveAs(Excel_file.Text); //这个参数是文件保存的路径 ExcelID.WorkBooks.Close; ExcelID.Quit; ExcelApplication1.Disconnect; MessageDlg('转出成功!',mtinformation,[mbok],0); end;
相关文章推荐
- 将Datagrid或其余表格控件的内容导入到Excel中
- 《Delphi 7跨平台控件开发与应用》内容简介
- 自动化测试 - RFT系列教程8:最复杂的控件:TABLE(一) 校验(读取)表格的内容
- Excel怎么将表格里内容进行伸缩?
- excel表格设置之冻结窗口(效果:让整个表格分成几部分,可以让下面的内容滚动显示)
- 用java的poi类读取一个excel表格的内容后再写入到一个新excel表格中的完整代码
- delphi中edit控件内容上下居中
- delphi 使用webbrowser取得网页中表格(Table)内容的正确方法
- 《查找表格内部元素及对其内容动态修改【查找表格控件】》
- 如何在web中实现类似excel的表格控件
- delphi学习点滴——操作excel的几个控件使用说明
- 在web中js实现类似excel的表格控件
- yii2从excel文件中读取表格内容,并批量写入数据库
- Excel表格内容过长不显示
- 如何使用免费控件将word表格中的数据导入到excel中
- C# 生成Excel文件及表格内容格式编辑 excel模板流
- ext+struts2上传excel并将excel表格显示在extgrid控件上的解决方案
- java如何将Excel表格中内容写入oracle数据库
- C# 窗体利用datagrdeview控件导出数据库中的内容为excel
- Delphi DbgridEh表格内容显示的状态