以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  未找到类型“SplitterPanel”的公共成员“VisualStyle”  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=85154)

--  作者:lzzhx
--  发布时间:2016/5/18 22:47:00
--  未找到类型“SplitterPanel”的公共成员“VisualStyle”
打开表时经常出现错误 :   未找到类型“SplitterPanel”的公共成员“VisualStyle”

找不到原因在什么地方,把程序重启一下就好了

--  作者:大红袍
--  发布时间:2016/5/18 22:54:00
--  

 哪个窗口哪个事件报错的?截图看看。


--  作者:lzzhx
--  发布时间:2016/5/18 23:20:00
--  
afterload事件,截图如下
图片点击可在新窗口打开查看此主题相关图片如下:4.png
图片点击可在新窗口打开查看


--  作者:Hyphen
--  发布时间:2016/5/19 8:22:00
--  
如果用的是改造过的SplitterPanel控件,是没有这这些属性的

贴出afterload事件代码看看

--  作者:大红袍
--  发布时间:2016/5/19 9:23:00
--  
贴拿出afterLoad代码,或者上传一个出错的实例
--  作者:lzzhx
--  发布时间:2016/5/19 11:56:00
--  
Dim zhut As Integer =getConfigValue("zhut",5)

For Each c As Winform.Control In e.Form.Controls
    If c.Gettype.Name="combobox" Or c.Gettype.name="DateTimePicker" Or c.Gettype.name="DropDownBox" Or c.Gettype.name="TextBox"   Then
        e.form.Controls(c.name).basecontrol.VisualStyle =zhut
        e.form.Controls(c.name).backcolor=Color.white
    End If
Next

上面代码中把红色代码注释掉,就不会出问题了,不注释时,有时正常,有时出上面所说的问题

--  作者:大红袍
--  发布时间:2016/5/19 13:04:00
--  
For Each c As object In e.Form.Controls
    If c.Gettype.Name="combobox" Or c.Gettype.name="DateTimePicker" Or c.Gettype.name="DropDownBox" Or c.Gettype.name="TextBox"   Then
        c.basecontrol.VisualStyle = zhut
        c.backcolor=Color.white
    End If
Next

--  作者:lzzhx
--  发布时间:2016/5/19 14:30:00
--  

代码这样改后,不能编译通过

 


此主题相关图片如下:10.png
按此在新窗口浏览图片

--  作者:lzzhx
--  发布时间:2016/5/19 14:48:00
--  

请老师再看看


--  作者:大红袍
--  发布时间:2016/5/19 15:03:00
--  

拷贝,粘贴7楼代码。