Stats

  • Locked Locked
  • Replies 2
  • Subscribers 143
  • Views 13475
  • Members are here 0
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Adding pulldown menu to ADE

meland

I'm trying to find the a way of appending a pulldown menu to the default ADE state. I am using cadence 6.1.5

Previous discussion: http://community.cadence.com/cadence_technology_forums/f/48/t/18056

Current solution: below is the contents of the file ./menus/spectre.menus

load(prependInstallPath("/etc/tools/menus/spectre.menus"))
(sevAddMenuItemLists (lambda (session name) (case name
  ("Example"
    list(
      hiCreateMenuItem( ?name 'MenuItem_1 ?itemText "Item1" ?callback "println('Item1)" )
      )
    ) ;Example
)))

(sevSetMainWindowPulldownMenus
  (let (menu)
   menu = `(
            "S&ession"
            "Set&up"
            "&Analyses"
            "&Variables"
            "&Outputs"
            "&Simulation"
            "Example"
    )
    when( envGetVal("adexl.launchFromTest" "showMenu")
        menu = cons("&Launch" menu)
    )
    menu
  )
)

Issue: By using sevSetMainWindowPulldownMenus, and the hand created variable 'menu', the pulldown menu is hard coded opposed to a solution that takes the existing menu list and appends 'Example'. This is an issue if any the default menus ever change. Everything I have read seems to suggest that excluding the function sevSetMainWindowPulldownMenus should do exactly what I want. However, if I do exclude it, 'Example' does not show up anywhere. Without knowing how to query the current pulldown menu list, I'm stuck.

Thanks,

Matthew

  • Matthew,

    Something like this should do what you want:

    load(prependInstallPath("/etc/tools/menus/spectre.menus"))

    let(((myOrigPulldownMenus copy(sevCustomEntity('sevMainWindowCME))))
      sevSetMainWindowPulldownMenus(
        foreach(mapcan menuName myOrigPulldownMenus
          if(menuName=="&Help" then
            list("Example" menuName)
          else
            list(menuName)
          )
        )
      )
    )

    sevAddMenuItemLists(
      lambda((session name)
        case(name
          ("Example" `(("Some Item" ?callback "MyDoThis()")))
        )
      )
    )

    Regards,

    Andrew.

  • This works perfectly. Thanks Andrew!

Community Guidelines

The Cadence Design Communities support Cadence users and technologists interacting to exchange ideas, news, technical information, and best practices to solve problems and get the most from Cadence technology. The community is open to everyone, and to provide the most value, we require participants to follow our Community Guidelines that facilitate a quality exchange of ideas and information. By accessing, contributing, using or downloading any materials from the site, you agree to be bound by the full Community Guidelines.