[Red Nova]

Доброго.
Сегодня перехожу на 2012. Со многим уже разобрался. Поставил 7-й СПДС, загрузил дополнительные лиспы.
Но вот VBA плагины которые использовал на 2010-м тут не работают.
Ищу обновленные версии для:
• Number (программа для автоматической нумерации)
• TextDuplicate (Программа для копирования текста)
• sl-smena-yazika (автоматически меняет язык при переходе в редактор текста)
Заранее спасибо.

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

VBA Enabler поставил?

[Red Nova]

oops ))) совсем забыл. Думал та же история что с 2010-м. Сейчас поищу его. Спасибо.

[Alexeipost]

Предлагаю тему переименовать в ".....поиск обновленных версий полезных утилит на х64"
И сразу ищу textduplicate для Autocad 2011 x64

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

Где хоть брал этот TextDuplicate? C автором связывался? Исходный код есть военная тайна?

[Alexeipost]

Вот он.
з.ы. в принципе меня устраивает cfld.lsp, но она не вставляет поле в таблицу, а у textduplicate данная возможность задекларирована.

[AlexV]

Сообщение от Alexeipost Предлагаю тему переименовать в ".....поиск обновленных версий полезных утилит на х64" И сразу ищу textduplicate для Autocad 2011 x64

не знаю, чего этот текстдубликате делает.. в Autocad 2013 x64 поменял пару строчек в коде, вроде на удивление заработало.. по крайней мере форма появляется, диалог с пользователем ведется, чего-то даже куда-то вставляется (по непонятной мне логике, - но я и не углублялся).

...что, на самом деле, удивительно. в 2010 64b вообще, если любая форма появлялась в программе, начинались глюки и в конечном счете все висло..

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

AlexV, я код не смотрел (некогда) - там часом ничего наподобие ObjectIDToObject не используется?

[AlexV]

Сообщение от Кулик Алексей aka kpblc AlexV, я код не смотрел (некогда) - там часом ничего наподобие ObjectIDToObject не используется?

Ага, используется..
"ObjectIDToObject" поменял на в одном месте на "ObjectIdToObject32", в другом "ObjectId" на "acObjectId"

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

Тогда уж лучше вынести это дело в отдельную функцию, которая в зависимости от (getvar "platform") будет использовать либо ObjectIDToObject, либо ObjectIDToObject32.

[AlexV]

Сообщение от Кулик Алексей aka kpblc Тогда уж лучше вынести это дело в отдельную функцию, которая в зависимости от (getvar "platform") будет использовать либо ObjectIDToObject, либо ObjectIDToObject32.

ага... только каков аналог (getvar "platform") на vba? в принципе, можно забацать 2 файла dvb, для разных платформ, и из RunTextDuplicate.LSP запускать нужную..

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

Нечто наподобие

Код:

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

UCase(ThisDrawing.GetVariable("platform")) Like "*X64*"

Ну а что передавать и что возвращать - это уже не ко мне