我退出的时候执行
  wkbook.Close(true,'c:\Demo1.xls',emptyparam,1) ;
  ExcelApplication1.quit;
  ExcelApplication1.Disconnect;系统提示C盘已经有Demo1.xls,是否覆盖。我选择是不报错,我选择NO,或者CANCEL,都会报错。
"OLE error 800A03EC".
请高手们帮助了!

解决方案 »

  1.   

    excelworkbook1.Save ;
    excelworksheet1.Disconnect;
    excelworkbook1.Disconnect;
    excelapplication1.Disconnect;这样就不会出问题,你试下
      

  2.   

    用不着disconnect的ExcelApplication1.ActiveWorkBook.Save;
    ExcelApplication1.workbooks.close;
    ExcelApplication1.quit;
      

  3.   

    对于新建的文件调用SaveAs;对于打开的文件调用Save。
      

  4.   


      try
        //保存数据
        ExcelName.SaveAs(MDReportDir+'\'+ReportName);
      except
        MSShow('无法保存数据');
        Panel2.Visible :=False;
        Animate1.Active :=False;
        abort;
      end;  //全部释放variant变量 ,否则Excel进程无法关闭
      try
        ExcelName.Close;
        ExcelApplication.Quit;
        ExcelSheet :=Unassigned ;
        ExcelName := Unassigned;
        ExcelApplication:=Unassigned;
        Ranges :=Unassigned;
      except  end;