Delphi控制Excel

最新推荐文章于 2024-11-16 09:33:13 发布

xxz1314

最新推荐文章于 2024-11-16 09:33:13 发布

阅读量834

点赞数

本文链接：https://blog.csdn.net/xxz1314/article/details/1905831

版权

本文介绍了如何使用Delphi编程控制Excel，包括启动和关闭Excel应用、添加工作表、操作表格内容、格式设置以及打印预览。通过创建OleObject并调用相关方法，可以实现对Excel的单元格合并、字体设置、边框样式、行高列宽等属性的调整，同时展示了如何设置打印参数。

摘要由CSDN通过智能技术生成

1.启动Excel

　　在Uses中加入Comobj;

var
　v:Variant;
begin
　v:=CreateOleobject(‘Excel.Application’);
　v.Visible:=true;
end;

　　其中，Comobj中包含了用来检索OLE的对象和向其传发命令的例程，第一行代码启动Excel,执行后Excel会在内存中出现，因此第二行代码使之可见。

2.关闭Excel

　　在创建了Excel Application对象后，调用它的Quit方法完成关闭事件。

If not varIsEmpty(v) then v.quit;

　　如果需要在关闭前确定是否存盘，加入：

v.DisplayAlert:=true; //确定存盘
v.DisplayAlert:=false;//不存盘，直接退出

3.加入工作表及对其表格内容的操作

var
　Sheet: Variant;
begin
　v.workbook.add;
　v.Workbooks.Add;
　v.Workbooks[1].WorkSheets[1].Name := '数据录入';
　Sheet:= v.Workbooks[1].WorkSheets['数据录入'