从EXCEL 导入记录后,如何释放?否则另外打开一个EXCEL文件得重启电脑.
发布日期:2021-11-10 09:01:17 浏览次数:2 分类:技术文章

本文共 480 字,大约阅读时间需要 1 分钟。

从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

转载于:https://www.cnblogs.com/delphi2007/archive/2008/11/18/1335915.html

转载地址:https://blog.csdn.net/aibi9196/article/details/101304689 如侵犯您的版权,请留言回复原文章的地址,我们会给您删除此文章,给您带来不便请您谅解!

上一篇:求delphi 对MD5的标准源码
下一篇:如何实现combobox只能从列表中选择但是同时又允许赋值,就是不能在框里输入信息....

发表评论

最新留言

路过按个爪印,很不错,赞一个!
[***.219.124.196]2024年03月21日 14时17分51秒