以文本方式查看主题 - 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=111162) |
-- 作者:Rhonin -- 发布时间:2017/12/16 10:50:00 -- 行颜色 老师好,请问一下怎样用colorpicker实现用户自定义特定行的颜色,现在我的逻辑是这样的:直接在行里加一列扩展类型设为颜色,加一个独立窗口设置颜色,如下图 此主题相关图片如下:666.png 然后在表属性的afterload里遍历行,让其颜色等于自己那一行颜色的值,但是赋值的时候出问题了,请问一下老师该怎么改 下面是赋值的代码 Dim c1 As color = e.form.controls("ColorPicker1").value Dim c2 As color = e.form.controls("ColorPicker2").value Dim c3 As color = e.form.controls("ColorPicker3").value For Each r As Row In Tables("发货库存_table1").Rows If r("库存天数") > e.form.controls("textbox3").value Then r("颜色")=c3 ElseIf r("库存天数") > e.form.controls("textbox2").value Then r("颜色")=c2 ElseIf r("库存天数") > e.form.controls("textbox1").value Then r("颜色")=c1 End If Next 谢谢老师
|
-- 作者:有点蓝 -- 发布时间:2017/12/16 11:16:00 -- textbox改为NumericComboBox控件 |
-- 作者:Rhonin -- 发布时间:2017/12/16 11:29:00 -- 谢谢老师,这个问题刚自己解决了,用的colorlabel,然后转换成整数搞定的,现在问题是怎么让每一行的背景颜色都等于其颜色列的值 |
-- 作者:有点蓝 -- 发布时间:2017/12/16 12:03:00 -- 参考:http://www.foxtable.com/webhelp/scr/0656.htm |
-- 作者:Rhonin -- 发布时间:2017/12/16 15:03:00 -- 那个老师,这个跟我那个不大一样,您看下我发的项目,是让每行的颜色等于颜色列的颜色...这个颜色是用户自己定义的 |
-- 作者:有点蓝 -- 发布时间:2017/12/16 15:44:00 -- 参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=100242&skin=0 |