以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Drawcell跟colorpicker能不能关联  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104965)

--  作者:zoudezhao
--  发布时间:2017/8/9 11:35:00
--  Drawcell跟colorpicker能不能关联
如题DrawCell与ColorPicker 控件能关联么,就是用ColorPicker去控制DrawCell的颜色
--  作者:zoudezhao
--  发布时间:2017/8/9 14:51:00
--  
我试了这段代码
Dim clr as Color = e.Form.Controls("ColorPicker1").Color.ToARGB
DataTables("表A")。AddUserStyle("未处理",Color.White,clr)
提示无效
应该怎么改 。。

--  作者:有点甜
--  发布时间:2017/8/9 15:48:00
--  
Dim clr As Color = e.Form.Controls("ColorPicker1").Color
DataTables("表A").AddUserStyle("未处理",Color.White,clr)

--  作者:zoudezhao
--  发布时间:2017/8/9 19:03:00
--  
甜老师但是这样Drawcell有没有什么方法可以实时更新呀,就是我的ColorPicker1调成red后DrawCell对应的可以直接变成这个颜色。我刚刚测试了下colorPicker1换颜色以后他的DrawCell是不会变色的。这个有没有方法解决呀,或者在选择一个颜色后。以后在打开系统默认还是这个颜色
--  作者:有点甜
--  发布时间:2017/8/9 19:13:00
--  

1、你要刷新表格,如

 

Tables("表A").Refresh()

 

2、你如果需要打开系统后,是新修改颜色,你还必须用saveconfigvalue或表格存放你设置的颜色,然后在afterOpenProject事件修改样式。


--  作者:zoudezhao
--  发布时间:2017/8/9 19:24:00
--  
好的感谢甜老师
--  作者:zoudezhao
--  发布时间:2017/8/9 20:12:00
--  
甜老师我刚刚测试了一下刷新表格的方法,。刷新后还是没有任何变动。。还是只会变一次。。
--  作者:有点甜
--  发布时间:2017/8/9 21:35:00
--  
以下是引用zoudezhao在2017/8/9 20:12:00的发言:
甜老师我刚刚测试了一下刷新表格的方法,。刷新后还是没有任何变动。。还是只会变一次。。

 

1、刷新后没有改变?那试试

 

Dim clr As Color = e.Form.Controls("ColorPicker1").Color
DataTables("表A").AddUserStyle("未处理",Color.White,clr)
DataTables("表A").styles("未处理").forecolor = clr
Tables("表A").Refresh

 

2、你要用一个表存放你的颜色,才能在重新打开项目的时候获取值重新设置样式的。


--  作者:zoudezhao
--  发布时间:2017/8/10 8:47:00
--  

好了感谢甜老师