这是以前的版本过低怎么改啊! LocalFileName:='';
  with TSaveDialog.Create(Nil) do
  begin
    DefaultExt:='.XLS';
    FileName:='收费接口文件'+FormatDateTime('yyyymmdd', Now())+'.XLS';
    Filter:='EXCEL 文件|*.XLS';
    InitialDir:=ExtractFileDir(Application.ExeName);
    Title:='保存收费接口文件';
    if Execute() then
    begin
      LocalFileName:=FileName;
    end;
    Free;

解决方案 »

  1.   

    二种办法:
    一是升级控件。
    二是通过高版本EXCEL读入,再保存(高版本格式)。实际使用中,高版本的EXCEL,是可以打开低版本的文件。向下兼容的。
      

  2.   

    这过程除了文件名外也和excel没关系呀
      

  3.   

    没有Excel导出过程啊
      

  4.   

    试试把XLS换成XLSX
      

  5.   

    把XLS换为XLSX
      

  6.   

    试着把驱动换成高版本的:AccessDatabaseEngine2007或者2010,区分32位和64位。
      

  7.   

     建议使用TXLSReadWriteII5,它支持高版本的EXCEL。
      

  8.   

    下一个TMS  advstringgrid advstringgridIO控件  你说这个问题轻松解决
      

  9.   

    TXLSReadWriteII5 这个挺好用的