通过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，还可以设置导出是否显示进度条、导出是否显示完成信息等等设置，具体可以到网络上去查询


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