以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]主窗口闪烁  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188373)
--  作者：chnfo
--  发布时间：2023/9/16 22:26:00
--  [求助]主窗口闪烁
有一个窗口X，里面有一个树，一个表。设为主窗口时。有一个按钮执行类似如下的代码：

Dim b As New CrossTableBuilder("统计表1",DataTables("订单"))
b.HGroups.AddDef("客户") \'添加客户列用于水平分组
b.VGroups.AddDef("产品") \'添加产品列用于垂直分组
b.Totals.AddDef("数量") \'添加数量列用于统计
b.Build \'生成统计表

然后主窗口就会闪烁。

但把窗口设为独立或者模式等，运行代码，不会闪。

如何避免主窗口闪烁
--  作者：ycli368
--  发布时间：2023/9/17 14:35:00
--  

e.Form.StopRedraw()

\'操作代码


e.Form.ResumeRedraw()

试试没
--  作者：有点蓝
--  发布时间：2023/9/17 20:46:00
--  
再试试

LockWindowUpdate(baseMainform.handle)
e.Form.StopRedraw()
Dim b As New CrossTableBuilder("统计表1",DataTables("订单"))
b.HGroups.AddDef("客户") \'添加客户列用于水平分组
b.VGroups.AddDef("产品") \'添加产品列用于垂直分组
b.Totals.AddDef("数量") \'添加数量列用于统计
b.Build \'生成统计表
e.Form.ResumeRedraw()
LockWindowUpdate(System.IntPtr.Zero)