[EfremenkoDO]

Есть такая проблема. Для редактирования определенного блока по двойному щелчку у меня есть реактор с функцией, которая выводит свой диалог по редактированию, но при этом я не могу отображать стандартные диалоги команд _eattedit и _bedit.

Как сделать так, чтоб я их мог вывести в теле реактора или мог использовать функцию реактора только для определенного блока, а для остальных ACAD выполнял стандартное действие на двойной щелчок?

[TararykovDG]

Сообщение от EfremenkoDO использовать функцию реактора только для определенного блока, а для остальных ACAD выполнял стандартное действие на двойной щелчок?

Если используется реактор типа vlr-mouse-reactor на событие :vlr-beginDoubleClick, то в функцию дейтсвия передается список с координатами точки. Тогда можно в функции действия через (ssget (точка)) получить объект или объекты по которым кликнули, ну и далее если это блок, если его EffictiveName совпадает с нужным, то такой диалог, если нет, то сякой диалог

[EfremenkoDO]

Сообщение от TararykovDG то такой диалог, если нет, то сякой диалог

как вызвать этот сякой диалог? все остальное работает.

Я понимаю, что нельзя из реактора вызывать диалоговые окна, но мое то собственное вызывается, следовательно есть способ вызвать и стандартные. Не переписывать же мне все стандартные окна?

[TararykovDG]

EfremenkoDO, может так

Код:

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

(defun MyFun_1(reac data / nbr)
  (vl-load-com)
  (if (setq nbr (ssget (car data)))
    (if (= (vla-get-EffectiveName (vlax-ename->vla-object (ssname nbr 0))) "<имя блока>")
      (vla-SendCommand
	(vla-get-ActiveDocument (vlax-get-acad-object))
	;(strcat "_-bedit " (vla-get-EffectiveName (vlax-ename->vla-object (ssname nbr 0))) "") ; - вот так не получилось
	(strcat "_bedit ") ; - а так окно "Редактирование описания блока" загрузилось, только вот блок нужно выбирать еще раз
	)
      )
    )
)

(setq dbr (vlr-mouse-reactor nil
	    (list '(:vlr-beginDoubleClick . MyFun_1)
		  )
	    )
      )

[EfremenkoDO]

Спасибо! выручил. все заработало