大富翁论坛-富翁笔记-将CxGrid的内容导出到Excel

uses cxGridExportLink,
procedure TFrmBomFc_back.ExcelBtnClick(Sender: TObject);
var sName:string;
begin
if SaveDlg.Execute then sName:=SaveDlg.FileName;
  if sName<>'' then ExportGridToExcel(sName,cxGrid2,True);
end;