Как определить состояние тулов на барах?

0 голосов
спросил 22 Апр, 05 от SLAM (280 баллов) в категории Программные продукты Esri

Как определить выбран ли такой-то тул?

Например, Pan или Identify.

Вот так я добираюсь до свойств тула:

...

Set pCmdBar = ThisDocument.CommandBars.Find(<нужная панель>)

set pCmdItem = CommandBars.Find(<нужный тул>)

Set pCommand = pCmdItem

...

то, что я нашел именно нужный мне тул я могу провеpить через его имя - Command.Name, так что нашел я его правильно

У ICommand есть свойство (для чтения) Checked, про которое в хелпе написано "Indicates if this command is checked.", т.е. "Определяет, выбрана ли комманда", но она всегда возвращает False.

В хелпе ничего подходящего больше не нашел.

Если можите, подскажите.

2 Ответы

0 голосов
ответил 22 Апр, 05 от Tatkis (2,420 баллов)

Попробуйте через

dim pApp as IApplication

set pApp=Application

msgbox pApp.CurrentTool.Name

 

0 голосов
ответил 03 Май, 05 от SmileGS (680 баллов)
Спасибо, действительно помогло
Добро пожаловать на сайт Вопросов и Ответов, где вы можете задавать вопросы по GIS тематике и получать ответы от других членов сообщества.
...