Foxtable(狐表)用户栏目专家坐堂 → 如何在字段标题后加一个筛选标记


  共有1624人关注过本帖树形打印复制链接

主题:如何在字段标题后加一个筛选标记

帅哥哟,离线,有人找我吗?
santde
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2293 威望:0 精华:0 注册:2015/6/14 18:33:00
如何在字段标题后加一个筛选标记  发帖心情 Post By:2016/3/23 8:33:00 [只看该作者]

如题,筛选标记是一个小图片。要能添加,删除,要给获取字段标题的起始位置。

 回到顶部
帅哥哟,离线,有人找我吗?
linswcfr
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:594 积分:5371 威望:0 精华:0 注册:2011/9/30 8:42:00
  发帖心情 Post By:2016/3/23 8:36:00 [只看该作者]

tables("表名").grid.allowfiltering = true

 回到顶部
帅哥哟,离线,有人找我吗?
santde
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2293 威望:0 精华:0 注册:2015/6/14 18:33:00
  发帖心情 Post By:2016/3/23 8:38:00 [只看该作者]

这是系统的筛选,我的筛选功能是自己做的


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/23 9:23:00 [只看该作者]

添加图标,参考

 

Dim g = Tables("表A").grid
Dim cs = g.GetCellRange(0, 1)
cs.Image = Getimage("d:\test.Ico")
If cs.style Is Nothing Then
    cs.style = g.Styles.add("第一列")
End If
cs.Style.ImageAlign = 7

 


 回到顶部