如何解决FastColoredTextBox 在悬停时更改链接颜色并在光标离开时返回旧颜色
我有不同风格的文字。链接使用蓝色,但在悬停时我想将其更改为深蓝色,我该怎么做?我找不到简单的解决方案。另外,我可以将链接颜色更改为其他颜色,但是当鼠标离开时,链接不会更改为旧颜色。
Private Sub txtOutput_MouseMove(sender As Object,e As MouseEventArgs) Handles txtOutput.MouseMove
Try
If e.Location.X > 0 And e.Location.Y > 0 Then
Dim p As FastColoredTextBoxNS.Place = txtOutput.PointToPlace(e.Location)
If CharIsHyperlink(p) Then
txtOutput.Cursor = Cursors.Hand
Else
txtOutput.Cursor = Cursors.IBeam
End If
End If
Catch ex As Exception
End Try
End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。