为 HyperLinkCellType 添加链接参数

在某些情况下我们会将Spread中某一列的单元格类型设置为 超链接（HyperLinkCellType ），并指定相应的 URL 地址（如： http://gcdn.grapecity.com ），然后会给 Spread 绑定数据源。

此时，我们会发现 HyperLinkCellType  所在的列，每个单元格的超链接地址都是指向同一个链接地址，有时候我们希望每个单元格的 URL 是不一样的，比如每个单元格 URL 中会带一个参数（如：http://gcdn.grapecity.com?id = 100），类似这样的需求我们可以通过自定义的 HyperLinkCellType  类型来实现我们的需求，代码如下：

• C#
  

1.     [Serializable]
   
2.     public class MyHyperLinkCellType : FarPoint.Web.Spread.HyperLinkCellType
   
3.     {
   
4.         public override Control PaintCell(string id, TableCell parent, FarPoint.Web.Spread.Appearance style, FarPoint.Web.Spread.Inset margin, object value, bool upperLevel)
   
5.         {
   
6.             if (value != null)
   
7.             {
   
8.                 HyperLink hl = base.PaintCell(id, parent, style, margin, value, upperLevel) as HyperLink;
   
9.                 hl.Target = Target;
   
10.                 hl.NavigateUrl = NavigateUrl + "?id=" + value.ToString();
    
11.                
    
12.                 return hl;
    
13. 
    
14.             }
    
15.             else {
    
16.                 return base.PaintCell(id, parent, style, margin, value, upperLevel);
    
17.             }
    
18.         }
    
19.     }

复制代码

• VB.NET
  

1. <Serializable> _
   
2. Public Class MyHyperLinkCellType
   
3.         Inherits FarPoint.Web.Spread.HyperLinkCellType
   
4.         Public Overrides Function PaintCell(id As String, parent As TableCell, style As FarPoint.Web.Spread.Appearance, margin As FarPoint.Web.Spread.Inset, value As Object, upperLevel As Boolean) As Control
   
5.                 If value IsNot Nothing Then
   
6.                         Dim hl As HyperLink = TryCast(MyBase.PaintCell(id, parent, style, margin, value, upperLevel), HyperLink)
   
7.                         hl.Target = Target
   
8.                         hl.NavigateUrl = NavigateUrl &amp; "?id=" &amp; value.ToString()
   
9. 
   
10. 
    
11.                         Return hl
    
12.                 Else
    
13.                         Return MyBase.PaintCell(id, parent, style, margin, value, upperLevel)
    
14.                 End If
    
15.         End Function
    
16. End Class
    

复制代码

使用自定义的 MyHyperLinkCellType  类型：

1.     protected void Page_Load(object sender, EventArgs e)
   
2.     {
   
3.         if (IsPostBack)
   
4.         {
   
5.             return;
   
6.         }
   
7. 
   
8.         MyHyperLinkCellType hlct = new MyHyperLinkCellType();
   
9.         hlct.NavigateUrl = "http://gcdn.grapecity.com/index.aspx";
   
10.         hlct.Target = "blank";
    
11. 
    
12.         hlct.ShowEllipsis = true;
    
13.         FpSpread1.ActiveSheetView.Columns[1].CellType = hlct;
    
14. 
    
15.         DataTable dt = new DataTable();
    
16. 
    
17.         dt.Columns.Add("Col1");
    
18.         dt.Columns.Add("Col2");
    
19.         dt.Columns.Add("Col3");
    
20. 
    
21.         dt.Rows.Add(1, 1, 3);
    
22.         dt.Rows.Add(1, 2, 3);
    
23.         dt.Rows.Add(1, 3, 3);
    
24.         dt.Rows.Add(1, 4, 3);
    
25.         dt.Rows.Add(1, 5, 3);
    
26. 
    
27.         FpSpread1.ActiveSheetView.DataAutoCellTypes = false;
    
28.         FpSpread1.ActiveSheetView.DataSource = dt;
    
29.             
    
30.     }

复制代码

通过以上方法，我们就可以动态设置每个单元格的 URL 地址

如何在一个单元格中实现多个超链接

我看到你在winforms板块也发了帖子，已经按照winforms开发包给你回复了答案。

你目前用的到底是哪个开发平台，请确认。否则没有办法给你准确的答案
后续发帖也请在对应的开发平台板块发帖