DS控件库 Win7链接列表框效果1:右侧箭头

时间:2021-03-05 05:14:41

Win7链接列表框是仿Windos7开始菜单项开发的控件,同样支持右侧箭头,由于使用场合的不同,本控件中右键箭头不作为菜单扩展,而是通过事件触发式响应。

先上图

DS控件库 Win7链接列表框效果1:右侧箭头

代码很简单,点击对右侧箭头区域点击的响应,此处显示在相应位置显示一个弹出菜单。

 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

  右侧除默认的箭头外,也支持自定义图像,如上图中的“图钉”,可根据不同需要设置不同的图像。