我正在使用 Delphi 7，我想使用自动化而不是使用文件将列表内容从我的程序导出到 OpenOffice Calc。
任务很简单：创建新文档、迭代行/列并更改单元格数据。
我找到了一些代码，但它并不完整，我希望有人有一些示例代码可以完成这个非常简单的任务。它可以节省我几个小时的尝试时间。
提前致谢！
编辑：我想自动化 OpenOffice Calc 来实现我上面写的内容。谢谢！
最简单的解决方案是编写 CSV 文件输出，并在 OpenOffice 中打开它。
还有用于编写 OpenOffice Calc 和 Excel 都可以读取的 .XLS 文件的库。 CSV 如此简单，我不知道你是否需要一个例子。创建一个 TStringList，并向其中添加逗号分隔格式的字符串。保存到文件。
所谓的“编程”方法涉及 OLE 自动化。
uses
OleAuto;
var
mgr,calc,sheets,sheet1,dt,args:Variant;
begin
args = VarArrayCreate(...);
mgr := CreateOleObject('com.sun.star.ServiceManager');
dt := mgr.createInstance('com.sun.star.frame.Desktop')
calc = dt.loadComponentFromURL('private:factory/scalc', '_blank', 0, args)
sheets = calc.getSheets()
sheet1 = sheets.getByIndex(0)
...
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
