delphi导出Excel

[ManBOyyy]

超过十万条数据，是用什么控件比较快速导出。请共享一下。目前用cxgrid导出。
ExportGrid4ToExcel(SaveDialog1.FileName,cxGrid1,True,True,True,'xls');此方法只能导出xls，不能导出xlsx.或者有什么办法大神们有什么办法呢

[Frank.WU]

SMEport EMS Advanced Data Export Component Suite 这两个完全满足

[rocket204]

我之前是这样写的：

procedure TFrmBridgePDFWindow.acApplyExecute(Sender: TObject);
var
  SSaveDialog       : TSaveDialog;
begin
  SSaveDialog := TSaveDialog.Create(nil);
  SSaveDialog.Filter := 'Excel 工作薄|*.xlsx';
  SSaveDialog.FileName := '';
  if SSaveDialog.Execute then
    ExportGridToXLSX(SSaveDialog.FileName, cxGrdMain, False, True, False, 'xlsx');

  SSaveDialog.Free;
end;

[zbdzjx]

如果不要格式，可以用TAB分隔的文本档，扩展名存成xls。 问题也是，扩展名只能是xls，不能是xlsx。 但试过了，存了19万多条记录，用Excel 2010是可以打开的。

[hongss]

引用 3 楼 zbdzjx 的回复:

如果不要格式，可以用TAB分隔的文本档，扩展名存成xls。 问题也是，扩展名只能是xls，不能是xlsx。 但试过了，存了19万多条记录，用Excel 2010是可以打开的。