找回密码
 立即注册

QQ登录

只需一步,快速开始

417827155

论坛元老

7

主题

18

帖子

8321

积分

论坛元老

积分
8321

活字格认证

417827155
论坛元老   /  发表于:2015-3-18 14:16  /   查看:5489  /  回复:3
我想把进度条调成这个样子

無題.png

设置的属性没有效果


2

2


  1.         Dim progcell As New FarPoint.Win.Spread.CellType.ProgressCellType()
  2.         progcell.FillColor = Color.Yellow
  3.         progcell.ShowText = False
  4.         progcell.FillColor2 = Color.Yellow
  5.         progcell.Style = FarPoint.Win.ProgressStyle.Picture
  6.         FpSpread1.Sheets(0).Columns(5).CellType = progcell
复制代码

3 个回复

倒序浏览
Alice
社区贡献组   /  发表于:2015-3-18 18:25:00
沙发
回复 1楼417827155的帖子

这是需要自定义单元格类型,然后PaintCell来画单元格。
代码参考:
  1. Class CustomProgressBar
  2.     Inherits FarPoint.Win.Spread.CellType.ProgressCellType
  3.     Public Overrides Sub PaintCell(g As System.Drawing.Graphics, r As System.Drawing.Rectangle, appearance As FarPoint.Win.Spread.Appearance, value As Object, isSelected As Boolean, isLocked As Boolean, zoomFactor As Single)
  4.         MyBase.PaintCell(g, New Rectangle(r.Right - 37, r.Y, 17, r.Height - 7), appearance, value, isSelected, isLocked, zoomFactor)
  5.     End Sub
  6. End Class
复制代码

评分

参与人数 1满意度 +5 收起 理由
417827155 + 5 谢谢

查看全部评分

请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
417827155
论坛元老   /  发表于:2015-3-19 12:25:00
板凳

嗯嗯,明白了,已经做出来啦。谢谢~
回复 使用道具 举报
Alice
社区贡献组   /  发表于:2015-3-19 14:37:00
地板
回复 3楼417827155的帖子

谢谢你对该问题的反馈。
很厉害,这么快就完成了。

也欢迎就本次服务评分:


另外,我们正在举行用户满意度有奖调查活动,诚挚邀请您参加。您只需回答链接中的几个问题,就可以获得 1000 枚GCDN金币,更有机会领取50 京东电子购物卡, 还等什么呢?赶快参加活动吧:http://www.wenjuan.com/s/Z3qEni/

评分

参与人数 1满意度 +5 收起 理由
417827155 + 5 3Q

查看全部评分

请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 立即注册
返回顶部