Spread设置鼠标样式

收藏

版主你好，我现在的版本是SPREAD 7.0。
当鼠标放在行头和列头的时候显示的是箭头，放在单元格上面是那种像Excel编辑模式时的那种空心十字。
现在没有设定什么，默认就是这个效果。想把当鼠标放在行头和列头的时候也改成这种十字。
用了下面的代码：
         foreach (CursorType ct in Enum.GetValues(typeof(CursorType)))
         {
            this.sht.SetCursor(ct, Cursors.Cross);
         }
运行起来是下面十字的样子，不是像Excel编辑模式时的那种空心十字

無題.png (1.83 KB, 下载次数: 783)

frank.zhang · frank.zhang

您好，
空心的十字是Spread内置的标识，目前没有相关的接口可以使用这个空心的十字。
目前，我尝试将这个空心的十字抓到，然后在复制到需要的地方。明天会继续调查。

frank.zhang · frank.zhang

您好，
实现的思路是从DLL取到这个资源，然后设置到需要的地方

private void button1_Click(object sender, EventArgs e)
{
Cursor c = LoadSpreadCursor("FarPoint.Win.Spread.default.cur");
fpSpread1.SetCursor(FarPoint.Win.Spread.CursorType.ColumnHeader, c);
}
private Cursor LoadSpreadCursor(string name)
{
Assembly sourceAssembly = typeof(FarPoint.Win.Spread.FpSpread).Assembly;
Stream manifestResourceStream = sourceAssembly.GetManifestResourceStream(name);
Cursor cursor = new Cursor(manifestResourceStream);
manifestResourceStream.Close();
manifestResourceStream.Dispose();
return cursor;
}

复制代码

rbgongming · rbgongming

回复 1楼keaitutu的帖子

你好：
你可以自定义一个Cursors，然后用FpSpread1.SetCursor(CursorType.ColumnHeader, newCursor)
的代码去设置。

keaitutu · keaitutu

OK，明白了，多谢

rbgongming · rbgongming

回复 3楼frank.zhang的帖子

版主，上面的代码变成Vb.Net怎么写？
可以告诉一下吗?

frank.zhang · frank.zhang

您好，
可以使用

Private Sub button1_Click(sender As Object, e As EventArgs)
Dim c As Cursor = LoadSpreadCursor("FarPoint.Win.Spread.default.cur")
fpSpread1.SetCursor(FarPoint.Win.Spread.CursorType.ColumnHeader, c)
End Sub
Private Function LoadSpreadCursor(name As String) As Cursor
Dim sourceAssembly As Assembly = GetType(FarPoint.Win.Spread.FpSpread).Assembly
Dim manifestResourceStream As Stream = sourceAssembly.GetManifestResourceStream(name)
Dim cursor As New Cursor(manifestResourceStream)
manifestResourceStream.Close()
manifestResourceStream.Dispose()
Return cursor
End Function

复制代码

给你推荐一个工具http://www.developerfusion.com/tools/convert/vb-to-csharp/