从EXCEL 导入记录后,如何释放?否则另外打开一个EXCEL文件得重启电脑.

从EXCEL   导入记录后,如何释放?否则另外打开一个EXCEL文件得重启电脑  
   
   
  谢了.

附代码:  
   
   
  MsExcel   :=   CreateOleObject('Excel.Application');  
      WorkBook   :=   MsExcel.Application;  
      filename:=trim(edit_filename.Text);  
      WorkBook.WorkBooks.Open(filename);  
      WorkBook.Visible   :=   False;  
      WorkSheet:=   WorkBook.ActiveSheet;  
   
       
      for   i:=2   to   WorkSheet.UsedRange.Rows.count   do  
      begin  
            ......  
      end;  
 

执行完后,需要退出时  
  WorkBook.Quit;

使用完后直接ExcelOPen.Quit;就OK了   。如果有连接就先断开连接disconnectio然后再QUIT

[新闻]Google iPhone语音识别程序已经上线
博客园首页 社区 新闻频道 小组 博问 网摘 闪存