将 DataGrid 的数据导为 Excel 文件

little-fish

使用DataGrid提供的SaveToXLS方法：

函数声明：procedure SaveToXLS(AFileName: string; ASaveAll: Boolean);

参数说明：
AFileName：是文件名；
ASaveAll： True代表导出所有记录，False代表只导出选中记录。


例如：
YWXX1.TSJWG1(DocView1.Doc).DataGrid.SaveToXLS('c:\aa.xls',true);

// YWXX1   ： 引入的业务信息的编号
// TSJWG1 ： YWXX6中一个数据网格文档
// DocView1： 业务功能中一个 DocView 对应 TSJWG1文档