pb6.5是不是比较不稳定

[jojoova]

我编了个程序，运行了几分钟就黑屏了，是程序黑屏，不是电脑黑屏

[liubocy]

那估计是你程序代码的问题

[jlwei888]

11。5都出了，为什么还用6.5

[jojoova]

代码我实在看不出问题，要不是要弄平滑滚动，我也不想用6.5啊，附上代码
scroll = scroll + sscroll
modstring = &
"DataWindow.VerticalScrollPosition=" + string(scroll)
dw_1.Modify(modstring)
modstring = ""
if scroll >= smax then
dw_1.retrieve()
scroll = 0
end if
sscroll是每次滚动的单位
帮我瞅瞅，有啥漏洞？

[jojoova]

这是timer事件里的，samx是滚动条的最大长度，每0.05秒触发一次timer事件

[jojoova]

不仅仅是程序异常，连pb开发工具也发生异常，需要重新打开才能正常使用。
是不是我装的pb6.5有问题啊？

[linger_liang]

你用debug单步调一下，看运行到哪里导致黑屏的。

[liubocy]

modstring = "DataWindow.VerticalScrollPosition='" + string(scroll) + "'"

[jojoova]

把图片贴上来，整个画面都乱了

[jojoova]

[Quote=引用 7 楼 liubocy 的回复:]
modstring  = "DataWindow.VerticalScrollPosition='" + string(scroll) + "'"

[/Quote]
这个我试过了，不行

[jojoova]

[Quote=引用 6 楼 linger_liang 的回复:]
你用debug单步调一下，看运行到哪里导致黑屏的。
[/Quote]
要跑大概几千次timer事件才会黑屏，我鼠标要点死了，-_-

[liubocy]

dw_1.retrieve() 放到timer事件外

[jojoova]

[Quote=引用 11 楼 liubocy 的回复:]
dw_1.retrieve() 放到timer事件外
[/Quote]
还是不行，崩溃

[liubocy]

先用1秒看看效果吧。

[jojoova]

改了还是一样，感觉就是版本问题了

[jojoova]

更正一下，用1秒似乎没事，顺利运行半小时了...

[jojoova]

继续更正，运行到47分又黑了