以文本方式查看主题

-  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=22929)

--  作者:exonjee
--  发布时间:2012/8/27 17:07:00
--  [求助]表内颜色标签绘制求教

见附件,单元格绘制标签颜色数据根据所选颜色,每行显示一个标签颜色,现在是一个颜色占据了两行位置显示,请帮忙修改代码;

 

或有其它更好的方法来实现自定义颜色标签管理方法

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:coloelabel.foxdb


--  作者:狐狸爸爸
--  发布时间:2012/8/27 17:26:00
--  
没有看懂你的问题
--  作者:exonjee
--  发布时间:2012/8/27 20:09:00
--  

请看下图,图1,2给制单元格异常,


图片点击可在新窗口打开查看此主题相关图片如下:img1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:img2.png
图片点击可在新窗口打开查看

 


 

需要下图的效果

 


图片点击可在新窗口打开查看此主题相关图片如下:img.png
图片点击可在新窗口打开查看

--  作者:exonjee
--  发布时间:2012/8/27 22:39:00
--  
老六看下如何解决
--  作者:狐狸爸爸
--  发布时间:2012/8/28 8:22:00
--  
If e.Col.Name = "颜色" AndAlso e.Row.IsNull("名称") = False Then
    Dim br As New system.Drawing.SolidBrush(color.FromARGB(cint(e.Row("名称"))))
    e.Graphics.FillRectangle(br,e.x + 1,e.y + 1, e.Width-2, e.Height - 2)
End If

--  作者:exonjee
--  发布时间:2012/8/28 8:32:00
--  

问题解决了,谢谢老六。还想问下有方法可以调用foxtable中的内置调色板,如图

 


图片点击可在新窗口打开查看此主题相关图片如下:img1.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2012-8-28 8:36:30编辑过]

--  作者:exonjee
--  发布时间:2012/8/28 9:25:00
--  
还想有方法可以调用foxtable中的内置调色板
--  作者:狐狸爸爸
--  发布时间:2012/8/28 9:37:00
--  

没办法。

另外你直接用扩展列类型,不是更方便吗:

http://www.foxtable.com/help/topics/0083.htm

 


--  作者:程兴刚
--  发布时间:2012/8/28 9:42:00
--  

五楼这个对您应该有用:

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=233&page=0&move=next


--  作者:exonjee
--  发布时间:2012/8/28 10:03:00
--  
谢谢,没有注意到扩展列,这个很好,可以满足需要。