|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
![]() |
Поиск в этой теме |
|
||||
Регистрация: 16.03.2015
Сообщений: 13
|
и снова добрый день.
Я решил вопрос с тем, как расставить камеры, с тем как сделать их нумерацию и привязать ее к камерам.... но встал другой вопрос. в данный момент я имею код вида: Цитата:
при структуре программы выше у меня производится расстановка камер и все. но если заменить строку (rasstanovka) закомментировать, то камеры без проблем про нумеруются. В чем проблема? |
|||
![]() |
|
||||
Пастух Регистрация: 16.07.2012
Питер
Сообщений: 318
|
Цитата:
__________________
Автоматизация должна быть автоматической. |
|||
![]() |
|
||||
Регистрация: 16.03.2015
Сообщений: 13
|
нет, это был кто-то другой. за деньги я не пишу. пока )))
Цитата:
----- добавлено через ~5 ч. ----- Внимание, новый вопрос: как работает выравнивание в ActiveX? мне нужно чтобы текст был выделен по центру, за это отвечает свойство alignment я имею код такого вида: Код:
на зарубежном форуме было написано, что выравнивание связано со свойством textAlignmentPoint, но я не понял каким образом. По факты, судя по свойсвам моих текстов, значение TextAlignmentPoint становится равным значению InsertionPoint, а InsertionPoint на новое. Вопрос, как мне сделать выравнивание текста по центру? ----- добавлено через ~5 ч. ----- Цитата:
Последний раз редактировалось wpww, 15.08.2016 в 10:29. |
|||
![]() |
|
||||
Что то я ничего не понимаю. В 12-ой строке есть (vla-put-alignment text acAlignmentCenter), но нигде не вижу (setq text...)
Работая с activeX надо указатель на объект запомнить, если есть желание его потом подредактировать. Например в 11 строке (setq text (vla-AddText...))
__________________
Не труд сделал из обезьяны человека, а лень и жажда халявы... |
||||
![]() |
|
||||
Регистрация: 16.03.2015
Сообщений: 13
|
Цитата:
вопрос. а как при помощи ActiveX создать новый слой? пока есть идея как это сделать через (entmake ...) |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
(vla-add (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))) "LayerName")
Только потом его надо будет настраивать: http://autolisp.ru/2014/03/05/base-s...rs-anf-styles/
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
![]() |
|
||||
Регистрация: 16.03.2015
Сообщений: 13
|
Цитата:
в данный момент имею такой код Код:
Но чтобы применить его на слой, необходимо чтобы значение vla-put-TrueColor было в виде vla объекта. Как это сделать? уже всю голову сломал. |
|||
![]() |
|
||||
Инженер LISP Регистрация: 11.05.2005
Минск
Сообщений: 6,992
|
Ну так там все как раз таки активХ
А у тебя как раз таки и нет. GetTrueColor нужна для создания entmake'ом Цитата:
Код:
__________________
Как использовать код на Лиспе читаем здесь |
|||
![]() |
|
||||
Регистрация: 16.03.2015
Сообщений: 13
|
Цитата:
единственное что, я заменил строчку Код:
Код:
|
|||
![]() |
|
||||
Пастух Регистрация: 16.07.2012
Питер
Сообщений: 318
|
потом опять начнете говорить, что где-то не работает, а где не знаю.
__________________
Автоматизация должна быть автоматической. |
|||
![]() |
![]() |
|
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
LISP. Вставка блока из чертежа исходя из двух параметров (длина и ширина) | Kairat.iskakov | LISP | 6 | 17.05.2016 15:04 |
Lisp. авто-нумерация атрибута блока. | DonJad | LISP | 10 | 26.10.2014 02:04 |
lisp: Длина по полилинии до точки | vosh | LISP | 19 | 15.07.2013 15:10 |
Координаты точки, лежащей на полилинии | Al_Taron | Программирование | 1 | 27.11.2006 09:45 |