[lohmatiy]

Как удалить надпись при проставлении размеров? Нужны только стрелочки, без цифр. Возможно такое? Рисовать цифры цветом фона не предлагать

[lohmatiy]

Видите ли, я еще не очень хорошо изучил взаимодействие Delphi и AutoCAd'a, и пользуюсь примерами с "хижины конструктора". В идеале было б конечно всю эту красоту (а именно элементы аппарата высокого давления) рисовать в том же делфи, но... Боюсь не получу от этого удовлетворения) А чертежи нужны лишь для иллюстрации расчетной части, ну и пыль в глаза пустить))) Чертежами этими пользоваться, естественно, никто не будет

Hwd, если знаешь, где можно разыскать дополнительную инфу, подобную http://www.cadhouse.nm.ru/, и с примерами, буду премного благодарен

[hwd]

Сообщение от lohmatiy инфу, подобную http://www.cadhouse.nm.ru/

Как-то мне не хочется, чтобы мой компьютер накрылся медным тазом...

п.с. Без изучения API AutoCAD далеко не уедешь... Какой именно Delphi? Если речь о Delphi.NET, то возможно будет интересно почитать это. В инете так же имеются хорошие блоги вроде этого (это если пишешь управляемый код). Ну и, в любом случае весьма полезной будет документация ObjectARX.

[357]

Сообщение от lohmatiy А стрелочки рисовать не знаю как, вот и ищу выход из положения

А командой _.leader не пробовал строить стрелочки?

[hwd]

Сообщение от lohmatiy А стрелочки рисовать не знаю как, вот и ищу выход из положения

Судя по данной фразе, автор берётся программировать в программе, работать с которой не умеет... Адская смесь получится...
"стрелочки рисовать"... (с)

Offtop: 2 модератор
имхо данному топику место скорее в разделе "программирование"...

[lohmatiy]

Это вы тут флудильню развели - место этому топику именно здесь) а стрелочки рисовать из трех палочек меня не радует))
А вообще тему можно крыть - а то выльют еще самосвал го**а, и сиди обтекай...

[hwd]

Сообщение от lohmatiy Это вы тут флудильню развели - место этому топику именно здесь) а стрелочки рисовать из трех палочек меня не радует)) А вообще тему можно крыть - а то выльют еще самосвал го**а, и сиди обтекай...

Для того, чтобы не "рисовать стрелочки из трёх палочек", нужно почитать хелп на тему создания размерных объектов. Глядишь и узнаете, что такое размерные стили и как ими пользоваться, тогда и не придётся извращаться...
Offtop: п.с. Начало флуда - создавать подобные топики с бестолковым содержимым.

[Дима_]

Сообщение от lohmatiy Как удалить надпись при проставлении размеров? Нужны только стрелочки, без цифр. Возможно такое? Рисовать цифры цветом фона не предлагать

Код:

[Выделить все]

(vl-load-com)
(defun c:test ( / ss)
(setq ss (ssget (list (cons 0 "DIMENSION"))))
(if ss (progn
		(vla-startundomark (vlax-get-property (vlax-get-acad-object) 'ActiveDocument))
		(mapcar	'(lambda (ent)
				(entmod (subst (cons 1 " ") (assoc 1 ent) ent)))
		(mapcar 'entget (vl-remove-if 'listp (mapcar 'cadr (ssnamex ss)))))
		(vla-endundomark (vlax-get-property (vlax-get-acad-object) 'ActiveDocument))))
(princ))