[Дмитрий01]

всех с прошедшими праздниками!!! у меня возникли трудности с использованием внешних ссылок, точнее вообще ни в зуб ногой. сделал чертеж узла в 3Д весит 12 Мб, подскажите, как создать внешние ссылки, желательно как можно подробней. заранее спасибо

[tanjakrasnich]

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

[АлексЮстасу]

Сообщение от tanjakrasnich да вот что-то ничего не могу найти по этому вопросу. а у вас так получается сразу несколько выбрать?

Указал мышью первый нужный файл в списке, нажал Shift или Ctrl, и нажимаю другой или другие файлы мышкой. Выделяются выбранные. Жму правую кнопку мыши и выбираю "Внедить".
Пардон - без правой кнопки есть окно выбора файлов, и там кнопка "Открыть".

[tanjakrasnich]

ну тогда вообще непонятно, наверно я что-то не так делаю

[АлексЮстасу]

Сообщение от tanjakrasnich ну тогда вообще непонятно, наверно я что-то не так делаю

А выбор нескольких файлов в виндовзовских окнах (допустим, в Проводнике) с помощью Shift или Ctrl работает?

[tanjakrasnich]

Ну я в общем уже нашла ответ в руководстве: ".....Откроется диалоговое окно "Выбор файла внешней ссылки" (стандартное диалоговое окно выбора файлов). Если требуется выбрать для вставки несколько файлов DWG, задайте для параметра "Тип файла" значение "Чертеж". Для всех других форматов файлов можно выбрать только один файл.". Странно что у вас все нормально открывается, если даже в инструкции указано, что это только для файлов dwg такое возможно..

[АлексЮстасу]

Сообщение от tanjakrasnich Ну я в общем уже нашла ответ в руководстве: ".....Откроется диалоговое окно "Выбор файла внешней ссылки" (стандартное диалоговое окно выбора файлов). Если требуется выбрать для вставки несколько файлов DWG, задайте для параметра "Тип файла" значение "Чертеж". Для всех других форматов файлов можно выбрать только один файл.". Странно что у вас все нормально открывается, если даже в инструкции указано, что это только для файлов dwg такое возможно..

Спасибо, и мне пригодится.
Я через это окно открываю только dwg. Растровые файлы с привязками гружу через Map (Civil). По наивности думал, что и Вы грузите именно dwg.
Вероятно, по одному файлу потому, что для всех других форматов нужно задавать опции загрузки каждого файла - точку вставки и пр.

[tanjakrasnich]

И вам спасибо, что постарались помочь

[Чуча]

Есть вопрос, ответа на него на этом форуме не нашла (может плохо искала?)
Есть архитектурный чертеж ( 50+ слоев), я буду чертить систему, используя эту архитектуру как внешнюю ссылку. Вот только сразу сообразить, какие слои из архитектуры заморозить, а какие - нет, пока не получается. То есть в процессе рисования моей системы возникает необходимость включить/выключить видимость некоторых арх. слоев. Я открываю арх. чертеж, выключаю там некоторый слой, но на моем чертеже даже после обновления ссылки этот слой виден!
Это норма? Неохота искать этот слой слоев в списке слоев на моем чертеже и отключать его вручную. Удалять в архитектуре слои или элементы в них - не вариант, потом может пригодиться (при проектировании след. системы на той же архитектуре).

[VVA]

Сообщение от Чуча Я открываю арх. чертеж, выключаю там некоторый слой, но на моем чертеже даже после обновления ссылки этот слой виден!

Неверно. Открывай диспетчер слоев в своем файле. При вставке внешней ссылки Автокад автоматически создает в диспетчере слов соответсвующий фильтр. Работая с внешними ссылками разберись с системной переменной VISRETAIN

Неохота искать этот слой слоев в списке слоев на моем чертеже и отключать его вручную

Можно отключать слой во внешней ссылке путем указания на примитив. Посмотри команду _layoff И вообще есть много других команд для комфортной работы со слоями
Если часто нужно что-то включать/отключать, то можно воспользоваться диспетчером конфигураций слоев или групповым фильтром слоев

[Чуча]

Спасибо!
Дело было в VISRETAIN.
Отключать слой через Диспетчер слоев в своем чертеже - неохота (названия слоев в арх. чертежах порой отличаются одним знаком, а слоев 50+).
Как раз кнопку с _layoff и использую всегда, но на внешнюю слылку она не работает (так ведь?).
А с диспетчером конфигураций слоев постараюсь разобраться, спасибо!

[VVA]

Сообщение от Чуча но на внешнюю слылку она не работает (так ведь?).

Нет не так. Как раз она очень удобна на внешних ссылках. Требование одно, что на одном слое не было намешано мух и котлет. VISRETAIN влияет на все ссылки, чтобы не всегда удобно (в моем случае всегда не удобно). Есть парочку программ.

Код:

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

(defun C:XReload (/ doc col xreflist ret)
  (vl-load-com)
  (setq doc (vla-get-activedocument (vlax-get-acad-object)))
  (vlax-for item (vla-get-blocks doc)
    (if (= (vla-get-isxref item) :vlax-true)
      (setq xreflist (cons (vla-get-name item) xreflist))
    ) ;_ end of if
  ) ;_ end of vlax-for
  (if xreflist
    (if (setq ret (_dwgru-get-user-dcl
                    "Select XREF "
                    (acad_strlsort xreflist)
                    t
                  ) ;_ end of _dwgru-get-user-dcl
        ) ;_ end of setq
      (progn
        (vla-startundomark doc)
        (setvar "VISRETAIN" 0)
        (mapcar
          '(lambda (xref)
             (vl-catch-all-apply
               '(lambda ()
                  (vla-reload (vla-item (vla-get-blocks doc) xref))
                ) ;_ end of lambda
             ) ;_ end of VL-CATCH-ALL-APPLY
           ) ;_ end of lambda
          ret
        ) ;_ end of mapcar
       (setvar "VISRETAIN" 1)
        (vla-endundomark doc)
      ) ;_ end of progn
    ) ;_ end of if
    (alert "No XREF Found")
  ) ;_ end of if
  (princ)
) ;_ end of defun

;;; ************************************************************************
;;; * Library DWGruLispLib Copyright © 2008 DWGru Programmers Group
;;; *
;;; * _dwgru-get-user-dcl (Candidate)
;;; *
;;; * Inquiry of value at the user through a dialogue window
;;; *
;;; *
;;; * 26/01/2008 Version 0002. Edition Vladimir Azarko (VVA)
;;; - the Output on double a clique if the plural choice (multi-nil) is forbidden
;;; - Processing of several columns
;;; * 21/01/2008 Version 0001. Edition Vladimir Azarko (VVA)
(defun _DWGRU-GET-USER-DCL (ZAGL        INFO-LIST   MULTI
                            /           FL          RET
                            DCL_ID      MAXROW      MAX_COUNT_COL
                            COUNT_COL   I           LISTBOX_HEIGHT
                            LST         _LOC_FINISH _LOC_CLEAR
                            NCOL
                           )
;| 
* Inquiry of value at the user through a dialogue window
* Dialogue is formed to "strike"
* the Quantity of lines on page without scrolling is set by variable MAXROW.
* It is necessary to remember, that number MAXROW increases on 3.
* the Maximum quantity of columns is set by variable MAX_COUNT_COL
* It is published
     http://dwg.ru/f/showthread.php?p=203746#post203746
* Parameters of a call:
    zagl - heading of a window [String]
    info-list - the list of line values[List of String]
    multi - t - the plural choice is resolved, nil-is not present
      
* Returns:
 The list of the chosen lines or nil - a cancelling
* the Example
 (_dwgru-get-user-dcl " Specify a variant " ' ("First" "Second" "Third") nil); _-> ("First") 
 (_dwgru-get-user-dcl " Specify a variant " ' ("First" "Second" "Third") t); _-> ("First"  "Second ")
 (_dwgru-get-user-dcl " Specify a variant "
   (progn (setq i 0 lst nil) (repeat 205 (setq lst (cons (strcat "Value-" (itoa (setq i (1 + i)))) lst))) (reverse lst)) nil)
 (_dwgru-get-user-dcl " Specify a variant, using CTRL and SHIFT for a choice "
   (progn (setq i 0 lst nil) (repeat 205 (setq lst (cons (strcat "Value-" (itoa (setq i (1 + i)))) lst))) (reverse lst)) t)
|;
  (setq MAXROW 40) ;_  max lines without scrolling (To it 3 more lines further will be added)
  (setq MAX_COUNT_COL 5) ; _ a maximum quantity of columns
;;============== Local functions START========================

  (defun _LOC_FINISH ()
    (setq I   0
          RET NIL
    ) ;_ end ofsetq
    (repeat COUNT_COL
      (setq I (1+ I))
      (setq RET (cons (cons I (get_tile (strcat "info" (itoa I)))) RET))
    ) ;_ end ofrepeat
    (setq RET (reverse RET))
    (done_dialog 1)
  ) ;_ end ofdefun
  (defun _LOC_CLEAR (NOMER)
    (setq I 0)
    (repeat COUNT_COL
      (setq I (1+ I))
      (if (/= I NOMER)
        (progn
          (start_list (strcat "info" (itoa I)))
          (mapcar 'add_list (nth (1- I) LST))
          (end_list)
        ) ;_ end ofprogn
      ) ;_ end ofif
    ) ;_ end ofrepeat
  ) ;_ end ofdefun

;;;==================== Local functions END ==================================
;;;==================== MAIN PART ===============================================
  (if (null ZAGL)(setq ZAGL "Select")) ;_ end if
  (if (zerop (rem (length INFO-LIST) MAXROW))
    (setq COUNT_COL (/ (length INFO-LIST) MAXROW))
    (setq COUNT_COL (1+ (fix (/ (length INFO-LIST) MAXROW 1.0))))
  ) ;_ end ofif
  (if (> COUNT_COL MAX_COUNT_COL)
    (setq COUNT_COL MAX_COUNT_COL)
  )
  (setq LISTBOX_HEIGHT (+ 3 MAXROW))
   ;_ We add 3 lines for appearance and for exception boundary scroll
  (if (and (= COUNT_COL 1) (<= (length INFO-LIST) MAXROW))
    (setq LISTBOX_HEIGHT (+ 3 (length INFO-LIST)))
  ) ;_ end ofif
  (setq I 0)
  (setq FL (vl-filename-mktemp "dwgru" NIL ".dcl"))
  (setq RET (open FL "w")
        LST NIL
  ) ;_ end ofsetq
  (mapcar '(lambda (X) (write-line X RET))
          (append (list "dwgru_get_user : dialog { "
                        (strcat "label=\"" ZAGL "\";")
                        ": boxed_row {"
                        "label = \"Value\";"
                  ) ;_ end oflist
                  (repeat COUNT_COL
                    (setq LST
                           (append
                             LST
                             (list
                               " :list_box {"
                               "alignment=top ;"
                               (if MULTI
                                 "multiple_select = true ;"
                                 "multiple_select = false ;"
                               ) ;_ end ofif
                               "width=31 ;"
                               (strcat "height= " (itoa LISTBOX_HEIGHT) " ;")
                               "is_tab_stop = false ;"
                               (strcat "key = \"info" (itoa (setq I (1+ I))) "\";}")
                             ) ;_ end oflist
                           ) ;_ end ofappend
                    ) ;_ end ofsetq
                  ) ;_ end ofrepeat
                  (list
                    "}"
                    ":row{"
                    "ok_cancel_err;}}"
                  ) ;_ end oflist
          ) ;_ end of list
  ) ;_ end of mapcar
  (setq RET (close RET))
  (if (and (null (minusp (setq DCL_ID (load_dialog FL))))
           (new_dialog "dwgru_get_user" DCL_ID)
      ) ;_ end and
    (progn
      (setq LST INFO-LIST)
      ((lambda (/ RET1 BUF ITM)

         (repeat (1- COUNT_COL)
           (setq I '-1)
           (while (and (setq ITM (car LST))
                       (< (setq I (1+ I)) MAXROW)
                  ) ;_ end of and
             (setq BUF (cons ITM BUF)
                   LST (cdr LST)
             ) ;_ end of setq
           ) ;_ end ofwhile
           (setq RET1 (cons (reverse BUF) RET1)
                 BUF  NIL
           ) ;_ end of setq
         ) ;_ end of repeat
         (setq RET RET1)
       ) ;_ end of lambda
      )
      (if LST
        (setq RET (cons LST RET))
      ) ;_ end ofif
      (setq LST (reverse RET))
      (setq I 0)
      (mapcar '(lambda (THIS_LIST)
                 (if (<= (setq I (1+ I)) COUNT_COL)
                   (progn
                     (start_list (strcat "info" (itoa I)))
                     (mapcar 'add_list THIS_LIST)
                     (end_list)
                   ) ;_ end ofprogn
                 ) ;_ end ofif
               ) ;_ end oflambda
              LST
      ) ;_ end ofmapcar

      (set_tile "info1" "0")
      (setq I 0
            NCOL 1
      ) ;_ end ofsetq
      (repeat COUNT_COL
        (action_tile
          (strcat "info" (itoa (setq I (1+ I))))
          (strcat "(progn (setq Ncol "
                  (itoa I)
                  ")(if (not multi)(_loc_clear Ncol))"
                  "(if (and (not multi)(= $reason 4))(_loc_finish)))"
          ) ;_ end ofstrcat
        ) ;_ end ofaction_tile
      ) ;_ end ofrepeat
      (action_tile "cancel" "(done_dialog 0)")
      (action_tile "accept" "(_loc_finish)")
      (if MULTI
        (set_tile "error" "Use CTRL and SHIFT for a choicet") ;_ end ofset_tile
        (set_tile "error" "It is possible to choose double click") ;_ end ofset_tile
      ) ;_ end ofif
      (if (zerop (start_dialog))
        (setq RET NIL)
        (progn
          (setq
            RET (apply
                  'append
                  (mapcar
                    '(lambda (ITM)
                       (setq THIS_LIST (nth (1- (car ITM)) LST))
                       (mapcar
                         (function (lambda (NUM) (nth NUM THIS_LIST)))
                         (read (strcat "(" (cdr ITM) ")"))
                       ) ;_ end ofmapcar
                     ) ;_ end oflambda
                    RET
                  ) ;_ end ofmapcar
                ) ;_ end ofapply
          ) ;_ end ofsetq

        ) ;_ end ofprogn
      ) ;_ end if
      (unload_dialog DCL_ID)
    ) ;_ end of progn
  ) ;_ end of if
  (vl-file-delete FL)
  RET
) ;_ end ofdefun

Покруче с выбором что обновлять с использованием ODBX Reset XRef Layers
Мое мнение - перегрузка должна быть в исключительных ситуациях. Для повседневного применения: _layoff + Конфигурации слоев или фильтры
Кроме того (опять же из личного опыта) мы никогда не используем чужие задания напрямую (и особенно архитекторов. все-таки люди творческие ). Они обязательно проходят предварительную "модерацию". В результате объем информации можно уменьшить в разы, а информативность чертежа повысить. Рекомендую ознакомиться с темой Подоснова и как ее продолжение - LISP. Подготовка подосновы

[vlig]

Всем привет! А вот такая ситуация.

Предположим, вставил я в пустой файл подоснову генплана, тем самым создав рабочий файл. Ну и, по ходу работы чуток подправлял слои внешней ссылки для красоты. Но потом понял, что необходимо более глубокое вмешательство в структуру слоев подосновы и их отображение.
Открываю, значит, внешнюю ссылку, навожу там марафет - доволен! Перехожу снова в рабочий файл, обновляю ссылку, а она, сабака, остаётся в основном прежней (за исключением вновь добавленных слоев при редактировании подосновы). Оно вроде бы и понятно почему так происходит, но мне-то нужна подоснова уже измененная!
Так вот: как отменить все изменения внешней ссылки таким образом, чтобы в рабочем чертеже она стала выглядеть точно так же, как и при непосредственном её открытии отдельно от рабочего файла? Более того: можно ли каким-то образом перенести настройки слоев внешней ссылки из рабочего файла в её собственные слои (при последующей возможной коррекции в пределах рабочего чертежа)??
Видимо, тут надо как-то конфигурациями слоев крутить, да пока не дотумкал, как именно...

Пробовал удалить внешнюю ссылку полностью (тем самым автоматически удалив и ее слои с нежелательными настройками), а затем снова её подгрузить - результат положительный! Но способ, если честно, довольно корявый. У меня ж ведь здесь будут ещё ссылки, и много, еще и с вложениями! - и отображение этой вот матрешки-мутанта надо как-то разруливать!

[Rina2012]

Подскажите пожалуйста можно ли заменить полный путь к внешней ссылке на относительный, т.к. проект уже выполнен и готов к отправке, а все ссылки к вставленным топосъемки приходиться обновлять (заново указывать путь к перемещенным папкам).

[asys]

Rina2012, попорбуй сделать архив (etransmit) с проекта. Он при архивации пути, вроде бы, на относительные меняет

[Rina2012]

Asys спасибо, попробую, а по другому не как? просто на работе инэт заблокировали, придется домой нести

[gve2005]

Сообщение от Rina2012 Подскажите пожалуйста можно ли заменить полный путь к внешней ссылке на относительный, т.к. проект уже выполнен и готов к отправке, а все ссылки к вставленным топосъемки приходиться обновлять (заново указывать путь к перемещенным папкам).

Зайдите в диспетчер ссылок, выделите внешнюю ссылку, абсолютный путь к которой вам нужно изменить на относительный. Внизу окна диспетчера в блоке "Подробности" найдите свойство "Найден в..." и в этом свойстве удалите часть абсолютного пути до той папки где сохранен исходник внешней ссылки, или до самого названия файла (если файл, который вставлен в чертеж как внешняя ссылка, находиться в одной папке с чертежом).

[Кулик Алексей aka kpblc]

У Alaspher'a вроде была lisp-функция, меняющая абсолютные пути на внутренние. Советую в Download найти "архив uniip" - по-моему, там она была.

[Rina2012]

Сообщение от gve2005 Зайдите в диспетчер ссылок, выделите внешнюю ссылку, абсолютный путь к которой вам нужно изменить на относительный. Внизу окна диспетчера в блоке "Подробности" найдите свойство "Найден в..." и в этом свойстве удалите часть абсолютного пути до той папки где сохранен исходник внешней ссылки, или до самого названия файла (если файл, который вставлен в чертеж как внешняя ссылка, находиться в одной папке с чертежом).

спасибо, но после перенесения всех съемок в одну папку с чертежами, ссылки не меняются. Заново вставляю и сразу задаю относительный путь. Просто давно уже работали на электронных, а тут бедное село попалось и съемка старая, да и семь км трассы оцыфровывать долго, время потеряем

Алексей спасибо, уже скачала, буду пробывать.

[VVA]

Rina2012, для etransmit иинтернет не нужен. Про то о чем говорил Алексей http://forum.dwg.ru/showthread.php?t=9117

[Rina2012]

Сообщение от VVA Rina2012, для etransmit иинтернет не нужен. Про то о чем говорил Алексей http://forum.dwg.ru/showthread.php?t=9117

я этим не когда не пользовалась, но я стараюсь, "etransmit" - в моем понимании - это название программы для создания архива?
сейчас пытаюсь подгрузить "лисп" который нашла по твоей ссылке, надеюсь все получиться, спасибо