[Nikolays]

При нажатии правой кнопки мыши появляется окно Visual Basik AutoCAD 2017 rus. При завершении команды правой кнопкой мыши появляется окно Visual Basik, нажимаем ОК, закрываем окно Visual Basik, команда завершается клавишей Enter на клавиатуре. Скриншот прилагается.

[Кулик Алексей aka kpblc]

Замечательно! Какая команда выполняется (это для начала)? Самописная? Если да - то вперед, анализировать код и проверять его корректность.

[TRex]

Давно я таким не занимался, но последний раз по моему поступал так, код пишешь в Visual Studio так автоподстановка происходит, а потом с изменением имён (если требуется) переносил в макросы

[Nikolays]

Сообщение от Кулик Алексей aka kpblc Замечательно! Какая команда выполняется (это для начала)? Самописная? Если да - то вперед, анализировать код и проверять его корректность.

Команда стандартная, просто при нажатии пкм в поле чертежа выскакивает окно Visual Basik. при выполнении команд для завершения команды пкм, появляется окно Visual Basik, его закрываем и команду можно завершить командой enter с клавиатуры.

[TRex]

Visual Basiс выскакивает - это говорит что в коде ошибка, он к сожалению не показывает по моему в каком месте ошибка, попробуйте если есть (запуск с точками остановки) может так получится понять где ошибка, в неправильных данных или в их отсутствии

[Сергей812]

вроде русским языком написано в предупреждении - объявите декларацию функций для 64-битной версии.. Что-то вроде

Код:

[Выделить все]

Declare PtrSafe Function GetAsyncKeyState Lib "user32" (ByVal kState As LongPtr) As LongPtr

[Boxa]

Сообщение от TRex Visual Basiс выскакивает - это говорит что в коде ошибка, он к сожалению не показывает по моему в каком месте ошибка

На картинке, вторая строчка с верху, подсвечена красным.

Я так понимаю, в какой то самописной программе по замене блоков, кто то реализовал прекращение работы и выход через отслеживание клавиш и с переходом на х64 автокад, эта функция не работает. Попросите автора программы поправить ее, ну или поправьте сами, как указал выше Сергей или за комментируйте этот функционал вообще.

[Nikolays]

Сообщение от Boxa На картинке, вторая строчка с верху, подсвечена красным. Я так понимаю, в какой то самописной программе по замене блоков, кто то реализовал прекращение работы и выход через отслеживание клавиш и с переходом на х64 автокад, эта функция не работает. Попросите автора программы поправить ее, ну или поправьте сами, как указал выше Сергей или за комментируйте этот функционал вообще.

Да не стоит никаких самописных программ

----- добавлено через ~4 мин. -----

Сообщение от Сергей812 вроде русским языком написано в предупреждении - объявите декларацию функций для 64-битной версии.. Что-то вроде Код: [Выделить все] Declare PtrSafe Function GetAsyncKeyState Lib "user32" (ByVal kState As LongPtr) As LongPtr

А как объявить декларацию функций для 64-битной версии, у меня Автокад 2017 русский 64 бит стоит.

[Сергей812]

Сообщение от Nikolays А как объявить декларацию функций для 64-битной версии, у меня Автокад 2017 русский 64 бит стоит.

заменить подсвеченную строку на мой вариант.. а лучше просто закомментируйте существующую строчку одиночной кавычкой впереди и вставьте новый вариант - сразу будет видна разница

[Boxa]

Ничто не ново под луной: https://forum.dwg.ru/showthread.php?t=134744
И картинки практически одинаковые...

[Nikolays]

Сообщение от Сергей812 заменить подсвеченную строку на мой вариант.. а лучше просто закомментируйте существующую строчку одиночной кавычкой впереди и вставьте новый вариант - сразу будет видна разница

Спасибо! ПКМ заработала.