Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
nikomuro
Зарегистрирован: 28.12.2013 Сообщения: 8
|
Добавлено: Чт Янв 09, 2014 4:27 pm Заголовок сообщения: Подскажите как создать подменю |
|
|
Подскажите добрые люди. Имеется код (простой пример)
Include "mapbasic.def"
Declare Sub Main
Declare Sub Test
Declare Sub theEnd
Declare Sub SubMain
Declare Sub SubMain1
Declare Sub SubMain2
Sub Main
Create Menu "Меню" As
"Список" Calling Test,
"Подменю" Calling SubMain
Alter Menu Bar Add "Меню"
end sub
Sub SubMain
Alter Menu "Подменю" Add
"первый" Calling SubMain1
end sub
Sub Test
Update Selection Set Xк = 12
end sub
Sub SubMain1
Update Selection Set Xк = 2
end sub
Как и что куда нужно добавить чтобы из пункта "Список" выпадали еще отдельные кнопки (как выпадающий список)
Спасибо заранее огромное |
|
Вернуться к началу |
|
|
nikomuro
Зарегистрирован: 28.12.2013 Сообщения: 8
|
Добавлено: Сб Янв 11, 2014 8:57 am Заголовок сообщения: |
|
|
Решение найдено. Проблема решена |
|
Вернуться к началу |
|
|
|