将数据导出到Excel的方法有多种,速度有快慢之分,我用过三种方法,速度都比较快,下面的一种利用Excel内置的功能,是三种之中最快的。其中最主要的是下面两句:
      xlQuery := xlSheet.QueryTables.Add(ADOQExport.Recordset ,xlSheet.Range['A3']);
      xlQuery.Refresh;
  不过我这里稍为复杂一点,要通过某种条件完成分类汇总。
  function ExportToExcel: Boolean;
  var
    xlApp, xlBook, xlSheet, xlQuery: Variant;
    SQLCmd: String;
    i, iNextRow: Integer;
    //设定单元格默认格式
    procedure ExcelSetDefau...[ 查看全文 ]