|
||
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
|
||||
Регистрация: 27.01.2012
Сообщений: 240
|
Спасибо, но мне нужно чтоб зависимый объект не перемещался за основным, а именно выделялся - т.е событие Selection Change - проблема в том, что ни в справочниках, ни у Полещука не могу найти реактор для этого события, А может ли быть такое что на Autolisp его нет, и надо программировать именно на VBA?
|
|||
|
||||
Регистрация: 20.03.2008
Сообщений: 2,653
|
Цитата:
|
|||
|
||||
Регистрация: 27.01.2012
Сообщений: 240
|
О!! Спасибо, то что надо -выделяются объекты группы и ручки остаются, спасибо, все легче чем я думал)
Но если кто-нибудь все-таки подскажет как решить проблему с помощью реактора буду рад Последний раз редактировалось kurstep, 11.01.2017 в 11:45. |
|||
|
||||
Регистрация: 20.03.2008
Сообщений: 2,653
|
1. Выделяем нужные объекты, вызываем команду (функцию), которую предварительно следует написать. Она создаст в чертеже информацию о том, какие элементы входят в нашу импровизированную группу. Каждый раз при ее вызове будет создавать новую запись. Где? Надо выбрать: пользовательские словари чертежа (ldata), пользовательские свойства документа... может еще варианты придумаются на второй взгляд. Если нужно в пределах сеанса, то просто запоминаем каждый набор в глобальной переменной.
2. Создаем реактор "прочих" событий (miscellaneous reactor) на событие pickfirstModified (предварительный набор объектов изменен): Код:
Код:
|
|||
|
||||
Регистрация: 23.04.2015
Сообщений: 163
|
Цитата:
Последний раз редактировалось frostmourn, 12.01.2017 в 02:11. |
|||
|
||||
frostmourn
Спасибо за помощь! Огорчает что osnap тут неполноценный и не реагирует на все привязки. Еще нет поддержки ortho / polar. А без этого теряется смысл использовать такую команду. Поняв что grread изначально не работает с привязкой я и подался в общий раздел .
__________________
Блог |
||||
|
||||
инженер-конструктор Регистрация: 24.08.2016
Санкт-Петербург
Сообщений: 1
|
Здравствуйте! Имеется макрос ^C^C(SetQ Cl (Getvar "Clayer"));-Layer;Set;arrow;^C_QLEADER;\\\^C(Setvar "Clayer" Cl) (создает пустую выноску в нужном слое, и возвращает предыдущий активный слой)
Очень хотелось бы создать лисп его заменяющий. Сначала, вдохновившись темой http://forum.dwg.ru/showthread.php?t=136285 пыталась использовать (command "_.QLEADER") в лиспе, но не разобралась как остановить выполнение qleader после задания 3х точек, чтобы он не запрашивал текст, его высоту. Теперь обдумываю возможность создания нового примитива через entmake, c запросом точек, и извлечением текущего разм. стиля. Буду благодарна если кто-то вразумит новичка в lisp |
|||
|
||||
Как проверить имеет ли REAL число только нули после запятой? То есть может ли оно быть превращено в INTEGER и не потерять своего точного значения?
Пример REAL 4.000 точно равно INTEGER 4 REAL 4.010 не равно INTEGER 4
__________________
Блог Последний раз редактировалось Red Nova, 15.01.2017 в 22:11. |
||||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787
|
Red Nova, ты путаешься в показаниях типах значений. int не может быть 4.01
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
kpblc, Верно, я имел ввиду с точностью до наоборот. Поправил. Глянь снова вопрос плиз.
Вопрос возник когда я делил два числа друг на друга и после должен был определить имеет ли результат остаток или нет. Пока что не сумел... То есть 95.000/24.000 = 3.958 - есть остаток 96.000/24.000 = 4.000 - нет остатка
__________________
Блог Последний раз редактировалось Red Nova, 15.01.2017 в 22:24. |
||||
|
||||
Регистрация: 20.03.2008
Сообщений: 2,653
|
Red Nova, на вскидку - то, что первым пришло в голову: выставляешь DIMZIN в 8, а затем "щупаешь" число функцией rtos (кажется, максимальное количество знаков после запятой, поддерживаемое AutoCAD'ом - 16). При таком раскладе все незначимые нули убираются и возвращается строка. Если в этой строке есть точка, значит число было нецелым.
Либо equal с нужным допуском. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787
|
Red Nova, а чем теме rem не нравится?
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Регистрация: 10.08.2013
Сообщений: 11,006
|
Глянул ради интереса у Полещука - он пишет "Символ языка LISP может менять в ходе своей программы тип своего значения". А при какой абсолютной величине дробной части числа оно перестает считаться вещественным? Наверняка заложена какая то константа в самом языке.
|
|||
|
||||
skkkk,
Сперва я тыкал DIMZIN и rtos, но что-то наверное делал не так раз не получалось. kpblc А как тут rem может помочь? В итоге сделал так: Код:
__________________
Блог Последний раз редактировалось Red Nova, 16.01.2017 в 00:07. |
||||
|
|||||
Регистрация: 20.03.2008
Сообщений: 2,653
|
Я тут тоже глянул...
Цитата:
Цитата:
----- добавлено через ~8 мин. ----- Цитата:
Цитата:
Ну получилось то, чего хотел? Я просто изначально не вполне понял практической сути вопроса. |
||||
|
||||
Цитата:
Цитата:
Наверное можно и покороче с rem что-то написать, но мне и так сойдет.
__________________
Блог |
||||
|
||||
Продуман Регистрация: 22.02.2007
Питер
Сообщений: 2,840
|
Я думаю это примечание надо читать в более глобальном смысле - если более заумными словами - LISP язык с динамической типизацией.
__________________
Когда в руках молоток все вокруг кажется гвоздями. |
|||
|
Опции темы | Поиск в этой теме |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
LISP. Вставка в таблицу поля, соотвествующего площади примитива | Profan | Готовые программы | 272 | 06.06.2021 23:12 |
Сейсмозащита и сейсмоизоляция существующих, построенных зд. | IANationalInformAgentstvo | Прочее. Архитектура и строительство | 216 | 20.01.2015 16:51 |
Мониторы LCD CRT | Разное | 94 | 17.06.2008 10:51 | |
ЮМОР 2006 =) | Perezz!! | Разное | 1122 | 04.01.2007 00:46 |