Мультикопия текста с одновременной правкой.
Работатет с Text, Mtext, Attdef.
Базовую точку при копировании выбираем сами.
Обрабатывается ввод enter или ПКМ для завершения команды.
___________
Обновил прогу, теперь редактируются и атрибуты в блоках.
Копируется любой набор объектов с переносом базовой точки в последнюю указанную. В этом наборе находятся текстовые объекты и предлагается по порядку их отредактировать.
2 варианта запуска, макрос на кнопку:
если надо редактировать текст
^C^C(if (eq Kr_Copy_and_Edit nil) (load "Kr_Copy_and_Edit.vlx"));(defun c:Kr () (Kr_Copy_and_Edit t));Kr
есле не надо редактировать текст (просто копируем)
^C^C(if (eq Kr_Copy_and_Edit nil) (load "Kr_Copy_and_Edit.vlx"));(defun c:Kr () (Kr_Copy_and_Edit nil));Kr
Выложено на сервер
20.07.2006
Последнее обновление
25.12.2006
Комментарии
17
Правообладателям!
Если вы являетесь правообладателем какого-либо материала, который размещен на этом сайте, и не хотите чтобы данная информация распространялась пользователями без вашего на то согласия - напишите нам, мы будем рады оказать вам содействие, удалив соответствующий материал.
>Alexander
<1. Запускаем команду, выбираем объект, нажимаем пробел и кричим - мама роди меня обратно.>
Исправил
<2. Запускаем команду, выбираем объект на заблокированном слое - опять караул!>
А что надо с ним делать, если он на заблокированном слое? На то он блокируется чтоб его не трогали. Внес проверку слоя.
<И зачем ругать комманду copy.>
Согласен. Погорячился. Мож тогда и оставить надпись <use first point as displacement> и жмите на пробел скоко влезит?
Alexander
20-07-2006 10:23
И зачем ругать комманду copy.
Русским по белому написано - Specify base point
дальше внимание or [Displacement] <Displacement>:
Так что вы птичку нашу не обижайте (Матроскин).
Alexander
19-07-2006 13:56
1. Запускаем команду, выбираем объект, нажимаем пробел и кричим - мама роди меня обратно.
2. Запускаем команду, выбираем объект на заблокированном слое - опять караул!
Krieger
19-07-2006 11:09
>ААА, Alex, ssn
Всем спасибо. Исправил. Теперь не мусорит.
Вообщето это Автокадовский баг команды "_Copy", которую я использую в проге. Я сделал соответсвующую поправку на этот баг, но если вдруг автодеск её исправит, то эта поправка начнет делать нежелательный результат.
Krieger
19-07-2006 08:52
>ААА, Alex, ssn
Всем спасибо. Исправил. Теперь не мусорит.
Вообщето это Автокадовский баг команды "_Copy", которую я использую в проге. Я сделал соответсвующую поправку на этот баг, но если вдруг автодеск её исправит, то эта поправка начнет делать нежелательный результат.
ААА
18-07-2006 09:40
Мусорит в тех случаях, если команду завершать правой кнопкой мыши или пробелом, т.е. создает еще одну лишнюю копию гдето сбоку. Если команду завершить Esc то все нормально.
Alex
18-07-2006 09:37
Согласен с ssn, немного мусорит. Мусорит в тех случаях, если команду завершать правой кнопкой мыши или пробелом, если команду завершать Esc то все нормально.
VLADOS
17-07-2006 22:58
Работает отлично!
FENOMENALNO, OVO MI JE TREBALO!
Vlados MONTENEGRO
17-07-2006 22:57
SPASIBA, RADI ZAISTA DOBRO!!!!
POZDAV
Krieger
17-07-2006 11:15
>ssn
??????????
Не заметил такого бага. А вообще в 2004-м не тестил.
Можно поподробнее на мыло? Krieger_pro(собака)mail.ru
ssn
15-07-2006 13:59
здравствуте. программа хорошая, только немного мусорит в чертеже (кроме создания "нужных" текстов рядом создаёт их копии...) если можно устранить этот баг - было бы хорошо.
АКАД 2004, не локализован
Krieger
14-07-2006 08:23
>Нюк
Я обновил архив. Попробуй еще раз скачать. Возможно это из-за локализованной версии када.
>Сослан, Mercury
Распаковываем в любую папку, которая находится в путях доступа када. Пути прописываются в Tools->Options->Files->Support File Search Path. Или просто скиньте в папку "C:Program FilesAutoCAD 200#support". Ну а дальше в каде создать кнопочку с макросом (который в описании). И собсно нажимать её.
Следующий способ:
Распаковываем куда хотим. Идем в Tools->AutoLISP->LoadApplications, находим распакованный файл - загружаем. Можно добавить в автозагрузку (кнопка Contents). Запускать вводя в комстроке "(Kr_Copy_Edit)" (со скобками).