以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  单元格颜色图例  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=190718)

--  作者:yifan3429
--  发布时间:2024/2/29 12:05:00
--  单元格颜色图例

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20240229120432.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20240229120406.png
图片点击可在新窗口打开查看
用代码直接根据颜色名称显示在单元格

[此贴子已经被作者于2024/2/29 12:04:58编辑过]

--  作者:有点蓝
--  发布时间:2024/2/29 12:08:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=158917
--  作者:yifan3429
--  发布时间:2024/2/29 12:15:00
--  
If e.Row("Color") <> "" Then
    Dim s As String = e.Row("Color") 
    e.Table.DataTable.AddUserStyle(s, e.Row("Color"), Color.black)
    e.Row("颜色_图示").Style = s
End If

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:表,系统_颜色管理,DrawCell
详细错误信息:
调用的目标发生了异常。
指定的转换无效。

--  作者:有点蓝
--  发布时间:2024/2/29 13:34:00
--  
Color存储的是什么值
--  作者:yifan3429
--  发布时间:2024/2/29 13:35:00
--  
AntiqueWhite
Aqua
Azure
BabyGreen
Beige
Bisque
Black
BlanchedAlmond
Blue
颜色英文名

--  作者:有点蓝
--  发布时间:2024/2/29 13:43:00
--  
http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=151712
--  作者:yifan3429
--  发布时间:2024/2/29 14:22:00
--  
没看懂 转换的代码 
--  作者:有点蓝
--  发布时间:2024/2/29 14:31:00
--  
dim c as color = Color.FromName(e.Row("Color"))
e.Table.DataTable.AddUserStyle(e.Row("Color"), c, Color.black)

--  作者:rogen
--  发布时间:2024/2/29 18:50:00
--  
宝强绿 
是亮点