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

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

Перенос блока на координаты в листе

Ответ
Поиск в этой теме
Непрочитано 18.12.2019, 12:16 #1
Перенос блока на координаты в листе
Xefan
 
Ведущий специалист ИТ и САПР
 
г. Тамбов
Регистрация: 03.07.2007
Сообщений: 34

Добрый день форумчанам )

Возникла следующая задача:
брать координаты нижнего левого угла листа (_limits), далее конкретный блок, выбранный пользователем, базовой точкой сажать на эти координаты.
Подскажите, как это можно реализовать в лиспе.
__________________
Ashes to ashes, dust to dust
Просмотров: 1166
 
Непрочитано 18.12.2019, 12:49
#2
CalcProg


 
Регистрация: 02.10.2016
Сообщений: 205


это делаетеся просто. берёте в библиотеке или покупаете книгу Н.Полещука и П.Лоскутова ' АвтоЛисп в среде АвтоКАД'. прочитываете её и пишите программку )))
CalcProg вне форума  
 
Непрочитано 18.12.2019, 22:56
#3
skkkk


 
Регистрация: 20.03.2008
Сообщений: 2,653


Код:
[Выделить все]
 (defun C:TEST ( / ss)
	(princ "\nВыберите блок:")
	(if (setq ss (ssget "_:S" '((0 . "INSERT"))))
		(vla-put-InsertionPoint (vlax-ename->vla-object (ssname ss 0)) (vlax-3D-point (getvar "LIMMIN")))
		(princ "\nБлок не выбран.")
	)
	(princ)
)
Код не проверял, но вроде, не работать тут особо нечему.
skkkk вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Перенос блока на координаты в листе

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите получить координаты блока в LSP PondVP LISP 5 29.11.2019 08:47
VBA. Не работает групповой код 2 (имя блока) DXF в изменённых динамических блоках. Кудахтыч Программирование 10 04.02.2019 05:33
LISP. Как в ActiveX выдернуть координаты полилинии? Как задавать атребуты блока через LISP? wpww LISP 31 16.08.2016 14:17
Как перенести на листе одновременно чертежи созданные в модели и непосредственно на самом листе? Rus28081986 AutoCAD 6 01.12.2015 16:20
перенос объектов в определенные координаты nawakster AutoCAD 3 19.11.2010 13:21