以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于StopRedraw  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84490)

--  作者:niu_niu
--  发布时间:2016/5/3 17:21:00
--  关于StopRedraw
用控件ComboBox 切换,加载窗口, 窗口数据加载时,用到了  dataTables("表A").DataCols.Add()   发现窗口会闪一下,能够看到列增加的过程,使用了StopReDraw  没起作用,请老师,指点,谢谢!



--  作者:大红袍
--  发布时间:2016/5/3 21:06:00
--  

试试

 

Dim dt As DataTable = DataTables("表A")
lockbasemainform
dt.StopRedraw

\'e.Form.StopRedraw
dt.datacols.Add("新增列", Gettype(Double))
dt.ResumeRedraw

\'e.Form.ResumeRedraw
unlockbasemainform


--  作者:niu_niu
--  发布时间:2016/5/4 11:27:00
--  
报错,提示“lockbasemainform” 为未声明名称。  当前用的是较早以前的平台,是不是不可以用呢?
--  作者:大红袍
--  发布时间:2016/5/4 11:28:00
--  

Dim dt As DataTable = DataTables("表A")
dt.StopRedraw

e.Form.StopRedraw
dt.datacols.Add("新增列", Gettype(Double))
dt.ResumeRedraw

e.Form.ResumeRedraw


--  作者:niu_niu
--  发布时间:2016/5/4 11:30:00
--  
如果单独使用下列语句,看不到列增加的过程,但是 有个白板  闪一下  后,看到数据。

Dim dt As DataTable = DataTables("表A")   
dt.StopRedraw


dt.ResumeRedraw          
                    

--  作者:niu_niu
--  发布时间:2016/5/4 11:36:00
--  
老师,用了 4楼的方法后,会有白板  闪动一下,可以解决吗?
--  作者:大红袍
--  发布时间:2016/5/4 11:41:00
--  
 不行,旧版没办法。你可以先把表格隐藏,最后再显示出来。
--  作者:niu_niu
--  发布时间:2016/5/4 11:44:00
--  
好的  谢谢