ExportGrid4ToEXCEL 這個老的版本用的,新的版本引用 cxGridExportLink 這個單元
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
cxClasses, cxControls, cxGridCustomView, cxGrid, ComCtrls,ComObj,
cxGridExportLink, ShowMsg, Menus,DBOperator,SqlHelp, RzCmboBx,
cxDropDownEdit, cxCheckBox, cxCalendar;
導出代碼
SaveDialog1.FileName := '訂單 '+Datetostr(DateTimePicker1.Date)+' 到 '+Datetostr(self.DateTimePicker2.Date);
if self.SaveDialog1.Execute then
ExportGridToExcel(self.SaveDialog1.FileName,cxGrid2,True,True,True,'xls');