自定义聊天菜单

单击内置聊天窗口右上角的按钮,会弹出一个菜单,我们可以对这个菜单进行自定义。

自定义聊天菜单很简单,设置QQClint的MenuItems属性即可,例如:

QQClient.MenuItems = "自定义项目之一|自定义项目之二|-|自定义项目之三"

执行上述代码后,打开内置聊天窗口,菜单会变为:

提示:

1、符号"-"在对应位置插入一个分割条。
2、需要在打开内置聊天窗口之前设置MenuItems,否则不会生效。

如果在设置MenuItems属性时,以符号"|"开头,则会保留原有菜单项目,例如:

QQClient.MenuItems = "|自定义项目之一|自定义项目之二|-|自定义项目之三"

菜单将变为:

单击自定义菜单后,会触发事件CustomMenuClick,通常将该事件的代码设置为:

Select e.MenuText
    Case "自定义项目之一"
        '要执行的代码
    Case "自定义项目之二"
        '要执行的代码
    Case "自定义项目之三"
       
'要执行的代码

End Select

如果要根据当前选定用户和消息内容动态显示不同的菜单,可以在BeforeShowMenu事件设置代码,例如:

If e.BuddyName.StartsWith("生产部.") Then '如果当前用户的分组是生产部
    QQClient.MenuItems =
"生产部菜单项之一|生产部菜单项之二"

ElseIf
e.BuddyName.StartsWith("销售部.") Then '如果当前用户的分组是销售部
    QQClient.MenuItems =
"销售部菜单项之一|销售部菜单项之二"

Else

    QQClient.MenuItems = "|" 
'使用默认菜单

End
If


本页地址:http://www.foxtable.com/webhelp/scr/3076.htm