我用comobj创建的excel对象
在插入表完成后我 要释放掉excel对象,同时要显示产生的excel表格
该咱们实现
    。。
    Eclapp.Workbooks[1].SaveAs(SaveFile);//保存
    Eclapp.Visible := true;   //显示  然后怎么释放对象?而不影响显示。谢谢!

解决方案 »

  1.   

    这样不可以吗?uses 
      ComObj;var
      AExcel: Variant;
      AWorkSheet: OleVariant;
    begin
      try
        AExcel := GetActiveOleObject('Excel.Application');
        AExcel.Application.Visible := True;
        AWorkSheet := AExcel.WorkSheets[1];
        AWorkSheet.SaveAs(SaveFile);
      except
        raise;
      end;
    end;
      

  2.   

    最後應該用:
    Eclapp := UnAssigned;
    才對!!
      

  3.   

    最後應該用:
    Eclapp := UnAssigned;
    才對!!
      

  4.   

    private
      xlApp: ExcelApplication;onDestroy
     if xlApp <> nil then   // if not VarIsEmpty(xlApp) then
     begin
       xlApp.DisplayAlerts[0] := False;
       xlApp.Exit;
     end;
      

  5.   

    oh, sorry,
      
         xlApp.Quit;