这段代码吃内存严重

[bombshell]

在窗口的 timer事件中：

dw_1.o b j e c t.t_t.x = string(integer(dw_1.o b j e c t.t_t.x) - 20)
if long(dw_1.o b j e c t.t_t.x) <= - long(dw_1.o b j e c t.t_t.width) then
dw_1.o b j e c t.t_t.x = string(dw_1.width)
end if

窗口的open事件
timer(0.05)
窗口的close事件
timer(0)

这段代码为什么不听得吃内存呢？有什么解决办法？

[老板卤两个蛋蛋]

叫他吐出来呀,内存都敢吃 胆子大!!!!!!!!!!!!

[lzheng2001]

楼主我下了你的程序测试了,可以说,你的代码没有问题,程序运行时,内存变动是正常的,这与操作系统有关,很多程序都这样,我造的一个程序开始运行时点用了10多M的内存,到第二天后就只剩下几M了, 楼主测试要有点耐心, 你的程序编译后在我的机上运行开始时内存(8332K)是会增加一些,但过了半小时左右内存已经很稳定了(8448K),再也没有什么变化了, 如果让它继续执行一下的话,我相信也不会增长,可能会象我的程序一样,到明天看一下时,会发现内存更少了,这应该是因为操作系统作了优化吧.

提醒一下楼主把窗口置顶用PB的函数就可以了不必用API
setposition(topmost!)

[robert126]

我也试了一下，运行正常，就是在运行的开始会少有内存使用变大，但是过一下就好了，p43.6就是牛！！

[lzheng2001]

运行了一个多小时了,内存没变化,楼主放心吧

[bingkuaiaj]

不妨试试其他方法
为何要用timer??
另外：
窗口的close事件
timer(0)
我认为没有必要！这些操作应该是自动的！

不过，我不太明白你写着段代码的意思？

[fjgt]

应该是没问题

[netspies]

还不如写在Resize事件里面呢

[freedom2001]

每0.05秒执行一次，不明白你写这段代码的作用是什么

[bombshell]

这是做的滚动字幕。如果有需要的朋友可以拿来用。非常感谢大家帮我测试。谢谢！