последовательно перебрать все RasterImage
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > последовательно перебрать все RasterImage

последовательно перебрать все RasterImage

Ответ
Поиск в этой теме
Непрочитано 01.07.2010, 11:48 #1
последовательно перебрать все RasterImage
EfremenkoDO
 
Санкт-Петербург
Регистрация: 24.12.2009
Сообщений: 59

Каким образом через LISP определить количество объектов типа ACADRasterImage и получить все их адреса (имена)?
Просмотров: 2161
 
Непрочитано 01.07.2010, 12:06
#2
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Код:
[Выделить все]
(vl-load-com)
(setq imageDict (dictsearch (namedobjdict) "ACAD_IMAGE_DICT"))
(setq image-name-list (mapcar 'cdr (vl-remove-if-not '(lambda(x)(= (car x) 3)) imageDict)))
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > последовательно перебрать все RasterImage



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нанотехнологические Новости T-Yoke Разное 221 20.06.2009 19:58
Вылетели все стили Печати, из вкладки Plot, не могу назначить стиль печати, все пусто nikashkoda AutoCAD 11 29.04.2009 21:17
Мониторы LCD CRT Разное 94 17.06.2008 10:51
проблема .....все на одном слое ..... Startrek AutoCAD 20 20.10.2005 08:03
как же распечатать все эти файлы? Orcad AutoCAD 6 19.11.2004 10:19