一个令人迷惑的问题,是我的程序问题还是EXCEL的问题? 在你的xlApp.Workbooks[1].Close;后面添加:VarClear(Sheet);VarClear(Selection);看看? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 TO KINGRON还是不行呀! 我观察程序EXCEL的运行,发现一个奇怪现象,EXCEL的更改速度有边化,首先是一般速度,刷新速度也可以,但做了一段时间就慢了下来,刷新速度也跟不上,屏幕闪得很,但又过了一会,突然更改的速度反而变快了,再接下来不久就报系统资源不足. 请在 xlapp.visible := true;后面添加: xlApp.ScreenUpdating := False;在 xlapp.quit;前面添加 xlapp.ScreenUpdating := True;根据测试,应该是Excel在更新界面的时候,占用了资源,但是没有完全释放。如果禁止屏幕更新,这样既可以提高效率,又不会占用大量的资源。你用这种方法试一下,看还会不会内存不足?我测试了100多个文件,没有问题。 如何在多个unit中调用excel单元格读写函数 本人初学 请帮帮忙 新人问个问题:如何把单引号'转为字符串? 我想请问一下: 各位在设计界面的时候,一般都采用“什么字体?”, “什么字号?” [求助]如何在工程中定义一个快捷键例如f12,在所有窗体中都有效? 大家帮忙看看这个东西怎么样? 发送邮件 急:请问高手怎么能实现像冰河那样查看历史缓存呢? 着急的人请教大家!!!!!!!! 高手求救:小弟万分感激,高分相送 请问:TImage.picture.assign() 与 TImage.picture.bitmap.assign() 两者之间有什么区别? 散分了!!!!!
还是不行呀!
xlapp.visible := true;
后面添加:
xlApp.ScreenUpdating := False;
在 xlapp.quit;
前面添加 xlapp.ScreenUpdating := True;根据测试,应该是Excel在更新界面的时候,占用了资源,但是没有完全释放。如果禁止屏幕更新,这样既可以提高效率,又不会占用大量的资源。
你用这种方法试一下,看还会不会内存不足?我测试了100多个文件,没有问题。