找回密码
 立即注册

QQ登录

只需一步,快速开始

Soft_Killer

注册会员

9

主题

35

帖子

199

积分

注册会员

积分
199

活字格认证微信认证勋章

Soft_Killer
注册会员   /  发表于:2014-4-21 09:22  /   查看:6665  /  回复:3
附件没法上传,描述如下:
控件名:
sprColor
主要设置:        
Me.sprColor_Sheet1.ActiveSkin = FarPoint.Win.Spread.DefaultSkins.Classic
Me.sprColor_Sheet1.SelectionStyle = FarPoint.Win.Spread.SelectionStyles.SelectionColors
Me.sprColor_Sheet1.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.[Single]
主要代码:
Imports FarPoint.Win.Spread.Model
Imports FarPoint.Win.Spread

Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        With sprColor_Sheet1
            .SelectionBackColor = SystemColors.Highlight
            .SelectionForeColor = SystemColors.HighlightText
            .SelectionUnit = SelectionUnit.Row
            .AddSelection(0, 0, 1, 1)

            Dim rh As FarPoint.Win.Spread.RowHeader
            Dim i As Integer
            rh = .RowHeader
            rh.ColumnCount = 1
            For i = 0 To rh.Rows.Count - 1
                'rh.Cells(i, 0).Locked = True
            Next

        End With
    End Sub
End Class
想实现:
在选中一行时行头不高亮,只有数据部分高亮,具体和Locked 效果类似,但是行头字体不变灰
2014-04-18_172632.png

3 个回复

倒序浏览
roger.wang
社区贡献组   /  发表于:2014-4-21 15:09:00
沙发
回复 1楼Soft_Killer的帖子

抱歉,无直接设置的属性,需要自定义RowHeader的PainCell函数--通过Graphic进行自绘单元格。

参考的C#代码:

  1. fpSpread1.ActiveSheet.RowHeader.DefaultStyle.Renderer = new MyEnhancedColumnHeaderRenderer();

  2. public class MyEnhancedColumnHeaderRenderer : FarPoint.Win.Spread.CellType.RowHeaderRenderer
  3.     {
  4.         public override void PaintCell(Graphics g, Rectangle r, FarPoint.Win.Spread.Appearance appearance, object value, bool isSelected, bool isLocked, float zoomFactor)
  5.         {
  6.             appearance.ContainsSelection = false;

  7.             //需要在此处理
  8.             base.PaintCell(g, r, appearance, value, isSelected, isLocked, zoomFactor);
  9.         }
  10.     }
复制代码
回复 使用道具 举报
Soft_Killer
注册会员   /  发表于:2014-4-21 16:38:00
板凳
回复 2楼roger.wang的帖子

问题解决,十分感谢!
回复 使用道具 举报
roger.wang
社区贡献组   /  发表于:2014-4-21 16:49:00
地板
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 立即注册
返回顶部