通过SMExportToExcel控件导出DBGrid、DBGridEh里的数据

下面的过程参数意义
ExportComponent：是指定的SMExportToExcel控件名称，
过程里的变量csDataSet是需要导出的数据集


procedure ExportIt(ExportComponent: TSMExportBaseComponent);
begin
ExportComponent.ColumnSource := csDataSet;
ExportComponent.DataSet := cdsExportData;
ExportComponent.AnimatedStatus := True;
ExportComponent.SelectedRecord := False;
ExportComponent.BlankIfZero := False;
ExportComponent.AddTitle := True;


//导出数据转换为字符型
ExportComponent.FileName := 'c:\test.xls';


ExportComponent.Execute;
end;

可以这样调用 ExportIt(ExportComponent);
SMExportToExcel，还可以设置导出是否显示进度条、导出是否显示完成信息等等设置，具体可以到网络上去查询


本文地址：[url]http://www.xszlo.com/article/2012-12-29/7874.html[/url]，转发请保留这个地址，谢谢