请求单元格加入图标方法 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请求单元格加入图标方法

共有3025人关注过本帖树形打印复制链接主题：请求单元格加入图标方法

fytea

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：787 积分：6175 威望：0 精华：0 注册：2015/7/25 19:14:00

请求单元格加入图标方法 发帖心情

Post By：2015/10/10 15:20:00 [只看该作者]

表中【第三列】有数据，则【标识】列显示小图标，无数据，则显示另一图标。

目的:美观，便于识别

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目32.foxdb

[此贴子已经被作者于2015/10/10 15:20:22编辑过]

Hyphen

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00

Post By：2015/10/10 15:49:00 [只看该作者]

图片列的使用参考http://www.foxtable.com/help/topics/1646.htm

更改图标参考DataColChanged事件http://www.foxtable.com/help/topics/0625.htm

如

If e.DataCol.Name = "第三列" Then
    If e.DataRow.IsNull("第三列") Then
        e.DataRow("标识") = GetImage("a.jpg")
Else
        e.DataRow("标识") = GetImage("b.jpg")
    End If
End If

fytea

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：787 积分：6175 威望：0 精华：0 注册：2015/7/25 19:14:00

Post By：2015/10/10 18:14:00 [只看该作者]

这怎么能实现呢？实现不了呀，帮助上要用到绘图

大红袍

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/10/11 11:05:00 [只看该作者]

方法一：在drawcell里画图片啊；

方法二：直接设置单元格背景图片，参考代码

Dim t As Table = Tables("表A")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.grid.Styles.Add("cs1")
cs1.BackgroundImage = getimage("d:\test.jpg")
cs1.Display = C1.Win.C1FlexGrid.DisplayEnum.ImageOnly
cs1.BackgroundImageLayout = C1.Win.C1FlexGrid.ImageAlignEnum.Stretch

t.grid.SetCellStyle(1, 1, cs1)