Win7链接列表框是仿Windos7开始菜单项开发的控件,同样支持右侧箭头,由于使用场合的不同,本控件中右键箭头不作为菜单扩展,而是通过事件触发式响应。
先上图
代码很简单,点击对右侧箭头区域点击的响应,此处显示在相应位置显示一个弹出菜单。
Private Sub Win7链接列表框1_点击箭头区域(Sender As Win7链接列表框, Itm As Win7链接列表框.链接项, 箭头区域 As Rectangle) Handles Win7链接列表框1.点击箭头区域
ContextMenuStrip1.Show(Win7链接列表框1.PointToScreen(New Point(Itm.矩形区域.Right, Itm.矩形区域.Top) - New Point(3, 0)))
End Sub
右侧除默认的箭头外,也支持自定义图像,如上图中的“图钉”,可根据不同需要设置不同的图像。