以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  打开窗口表时总会闪烁一下的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=52415)

--  作者:scott518
--  发布时间:2014/6/15 20:19:00
--  打开窗口表时总会闪烁一下的问题

很多窗口表如果在afterLoad代码中有绑定数据等,打开窗口时都会闪烁一下,用了各种StopRedraw都没有用,究其原因最终就是每个窗口打开时都会先默认添加一个10行10列的表,怎么样才在窗口打开时不要加载这个表?

谢谢!

 


图片点击可在新窗口打开查看此主题相关图片如下:a1.gif
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2014/6/15 20:22:00
--  
 试试,把这个Table控件设置成不可见的。在你填入数据以后,再把这个Table控件给显示出来。
--  作者:scott518
--  发布时间:2014/6/15 20:39:00
--  

LockBaseMainForm,e.Form.StopRedraw 等都没用


Dim tbl As Table = e.Form.Controls("Table1").Table

tbl.visible = false

\'tbl.datatable.datarow.clear() \'先删除表也没用

.......

 

tbl.visible = true

 

这样也没用。


--  作者:有点甜
--  发布时间:2014/6/15 20:45:00
--  
 用例子说话。
--  作者:lsy
--  发布时间:2014/6/16 10:00:00
--  

e.Form.Controls("Label消除闪烁").TopMost = True

\'\'\'\'其他代码

e.Form.Controls("Label消除闪烁").BackMost = True


--  作者:scott518
--  发布时间:2014/6/16 10:24:00
--  

谢谢,按5楼那样还是不可以。


--  作者:lsy
--  发布时间:2014/6/16 10:31:00
--  

Label要遮住所有会闪烁的界面,或者干脆遮住整个窗口。

 


--  作者:有点甜
--  发布时间:2014/6/16 10:48:00
--  
以下是引用scott518在2014-6-16 10:24:00的发言:

谢谢,按5楼那样还是不可以。

 

例子说话。