Задача добавить пункт меню и связать со скриптом. Смотрим код:
b = av.GetProject.FindGUI("View").GetMenuBar newPositionIndex = b.GetControls.Count - 2 newMenu=b.New( newPositionIndex ) newMenu.SetLabel("Test") theItem1= newMenu.New(-1) theItem1.SetLabel("Hello") theItem1.SetClick( "Script1" )
Теперь результат.
После щелчка срабатывает скрипт.
MsgBox.Info("Menu","")
Ну и сам код. Первое мы находим объект меню для вида.
b = av.GetProject.FindGUI("View").GetMenuBar
Получаем позицию и добавляем в эту позицию пункт меню.
newMenu=b.New( newPositionIndex )
Дальше устанавливаем надпись и создаем подпункт.
theItem1= newMenu.New(-1)
И опять надпись, и свойство какой скрипт вызывать.