[MAXIMUSAKTAU]

Уважаемые господа, столкнулся с такой проблемой, ранее в ACAD 2007 года была очень удобная команда поиска текста в чертеже с зумированием на объект поиска, то есть на большом чертеже я мог с легкостью найти место положения нужной мне например цифры и спозиционироваться на этом месте для дальнейшей работы. В 2009 автокаде такой команды нет, хоть текст там и ищется но к сожалению не позиционируется на нем при закрытии окошка поиска так как там такой кнопки уже нет, подскажите пожалуйста как её можно сделать, очень нужна.

[Хмурый]

Update3 надо установить. этот баг команды _find исправлен.

[Profan]

Но такой возможности нет и в 2010.
Хотя в Спрвке написано:
Зумирование по выделенному результату
Зумирование по выбранному в списке объекту. Данная функция недоступна при отсутствии результатов или выделении нескольких результатов. Зумирование по границе объекта также можно выполнить с помощью двойного щелчка на выделенном объекте.

[MAXIMUSAKTAU]

Сообщение от Хмурый Update3 надо установить. этот баг команды _find исправлен.

а где можно этот update3 скачать и установить?

[forMA]

to MAXIMUSAKTAU :
---------------------------------
Попробуй такую утилиту. Может пригодится.

Код:

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

(defun c:modfind (/ adoc selset string _kpblc-get-active-space-obj radius)
  (defun _kpblc-get-active-space-obj ()
    (if  (and (zerop (vla-get-activespace adoc))
       (= :vlax-false (vla-get-mspace adoc))
       ) ;_ end of and
      (vla-get-paperspace adoc)
      (vla-get-modelspace adoc)
      ) ;_ end of if
    ) ;_ end of defun
  (vl-load-com)
  (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
  (vla-startundomark adoc)
  (if (and (setq string (getstring t "\nInsert text <Cansel> : "))
     (setq radius (getdist "\nRadius circle <Cansel> : "))
     (setq
       selset (ssget
         (list '(0 . "TEXT")
         (cons 1
               (strcat "*" string "*")
               ) ;_ end of cons
         (cons 410
               (if (or (= (getvar "tilemode") 1)
                 (/= (getvar "cvport") 1)
                 ) ;_ end of or
           "Model"
           (getvar "ctab")
           ) ;_ end of if
               ) ;_ end of cons
         ) ;_ end of list
         ) ;_ end of ssget
       ) ;_ end of setq
     ) ;_ end of and
    (foreach item (vl-remove-if 'listp (mapcar 'cadr (ssnamex selset)))
      (vla-addcircle
  (_kpblc-get-active-space-obj)
  (vlax-3d-point
    (cdr (assoc (if (= (cdr (assoc 72 (entget item))) 0)
      10
      11
      ) ;_ end of if
          (entget item)
          ) ;_ end of assoc
         ) ;_ end of cdr
    ) ;_ end of vlax-3d-point
  radius
  ) ;_ end of vla-addcircle
      ) ;_ end of foreach
    ) ;_ end of if
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun

[MAXIMUSAKTAU]

Сообщение от Бубырь-UA to MAXIMUSAKTAU : --------------------------------- Попробуй такую утилиту. Может пригодится. Код: [Выделить все] (defun c:modfind (/ adoc selset string _kpblc-get-active-space-obj radius) (defun _kpblc-get-active-space-obj () (if (and (zerop (vla-get-activespace adoc)) (= :vlax-false (vla-get-mspace adoc)) ) ;_ end of and (vla-get-paperspace adoc) (vla-get-modelspace adoc) ) ;_ end of if ) ;_ end of defun (vl-load-com) (setq adoc (vla-get-activedocument (vlax-get-acad-object))) (vla-startundomark adoc) (if (and (setq string (getstring t "\nInsert text <Cansel> : ")) (setq radius (getdist "\nRadius circle <Cansel> : ")) (setq selset (ssget (list '(0 . "TEXT") (cons 1 (strcat "*" string "*") ) ;_ end of cons (cons 410 (if (or (= (getvar "tilemode") 1) (/= (getvar "cvport") 1) ) ;_ end of or "Model" (getvar "ctab") ) ;_ end of if ) ;_ end of cons ) ;_ end of list ) ;_ end of ssget ) ;_ end of setq ) ;_ end of and (foreach item (vl-remove-if 'listp (mapcar 'cadr (ssnamex selset))) (vla-addcircle (_kpblc-get-active-space-obj) (vlax-3d-point (cdr (assoc (if (= (cdr (assoc 72 (entget item))) 0) 10 11 ) ;_ end of if (entget item) ) ;_ end of assoc ) ;_ end of cdr ) ;_ end of vlax-3d-point radius ) ;_ end of vla-addcircle ) ;_ end of foreach ) ;_ end of if (vla-endundomark adoc) (princ) ) ;_ end of defun

Простите уважаемый но я профан в этом деле, я ничего не понял

[Хмурый]

MAXIMUSAKTAU, на офсайте Autodesk
http://usa.autodesk.com/adsk/servlet...40618#section2
никакие утилитки не нужны

[forMA]

Сообщение от Хмурый MAXIMUSAKTAU, на офсайте Autodesk http://usa.autodesk.com/adsk/servlet...40618#section2 никакие утилитки не нужны

Не скажи. Гарантировано найти и отметить несколько одинаковых текстов среди сотен других кое что значит.

[Хмурый]

Бубырь-UA, речь идёт о команде _find и её опции "zoom to"
http://forum.dwg.ru/showthread.php?p...ind#post295476

[MAXIMUSAKTAU]

Сообщение от Хмурый MAXIMUSAKTAU, на офсайте Autodesk http://usa.autodesk.com/adsk/servlet...40618#section2 никакие утилитки не нужны

Спасибо, а ничего если у меня автокад русский полностью?

[Хмурый]

MAXIMUSAKTAU, там нет разницы.

[MAXIMUSAKTAU]

Ок, понял, завтра попробую, потом отпишусь...

Скачал я в общем этот update 3, установил и ... никаких изменений не увидел, все как было так и осталось может где то надо что то включить?

Все ок господа, после перезагрузки системы все заработало, теперь при поиске все позиционируется и никуда не соскакивает, всем большой респект!