查看完整版本: 求助！怎么来判断PopupMenu弹出菜单的选项是否可以选择

求助！怎么来判断PopupMenu弹出菜单的选项是否可以选择

先谢谢啦！


PopupMenu的弹出菜单有的可以使用，有的不可以使用，
[b]怎么来判断PopMenu弹出菜单的选项是否可以选择使用啊？？？？[/b]

[[i] Last edited by rubydove on 2005-4-21 at 09:05 [/i]]

好像没人回贴!

同问
有知道的大侠请指教哦

判断popupmenu的菜单项的是否可用
提供一个伪代码：

Sub Main
    Dim Result As Integer

    'Initially Recorded: 2005-5-14  23:24:18
    'Script Name: PopupMenu
    Dim iResult as Integer
    Dim vStatus as Variant
    Dim iStatus as Integer

    Window SetContext   窗体名称
    Result = SQAGetProperty(Type=PopUpMenu;Name=NameOfMenu", "Enabled",vStatus)

    iStatus = vStatus

    If Result = 0 Then
      If iStatus = -1 Then
       '菜单操作代码
      End if
      
   End If

End Sub

还有在自动化测试框架中rrafs中提供了菜单操作代码，可以提供给你使用！

MenuUtilities类库

[url]http://groups.yahoo.com/group/RobotDDEUsers/files/Doc/sqabasic2000/MenuUtilities.htm[/url]

谢谢啊,呵呵,我现在也在学数据池.