[dim5678]

В общем суть проблемы следующего характера:
1. Имеется задание от АР, проектировщик перевел из архикада в автокад свое творение.
2. Сегодня 5 часов мучался пытаясь собрать все его листы в одном файле пространства модели (так нужно).
3. Вроде бы найдено было решение - через bgtools 2.22b, командами:
- BGLAYDEL - Удаление выключенных и замороженных слоев с примитивами
- BGBLEXP - Взрывает блок и все блоки, входящие в него, превращая видимые атрибуты в текст
Но возникли проблемы...во первых в мой исходник где были прорисованы однолинейные схемы он вообще не хочет копироваться.
Во вторых файл очень и очень долго сохраняется до 2минут доходит. Просто висит 1,45минуту, а потом выдает сохранить...и за 15 сек сохраняет,,в почему этот интервал в 1-1.45 минуту выдерживается акадом так и не понял.

Задача:
1. Очистить чертеж так, чтобы он сохранял быстро и без тормозов.
2. Почему архикад не дает копировать в мои чертежы (хотя на пустой лист копирует).
3. Прилагаю файл для рассмотрения.

Об моем устройстве: акад 2011, экспресс туллс родной, спдс 7,1. ноут- I7 (2,2), памяти 8ГБ.

[gomer]

разобрал килобайты мусора в крысовом коде. получилось так вот

Код:

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

 (vl-load-com)

(defun C:ERASE-WIPEOUT ()

  ( (lambda (doc cnt1 cnt2 cnt3)

      (vla-startundomark doc)

      (vlax-for blk_def (vla-get-blocks doc)
        (if (equal :vlax-false (vla-get-isxref blk_def))
          (vlax-for ent blk_def
            (if (= "AcDbWipeout" (vla-get-objectname ent))
              (progn
                (setq cnt1 (1+ cnt1))
                (if 
                  (vl-catch-all-error-p
                    (vl-catch-all-apply 'vla-erase (list ent))
                  )
                  (progn
                    (princ
                      (strcat
                        "\nНевозможно удалить WIPEOUT из блока "
                        (vlax-get-property
                          blk_def
                          (strcat
                            (if (vlax-property-available-p blk_def 'EffectiveName)
                               "Effective" ""
                               "Name"
                            )
                          )
                        )
                      )
                    )
                    (setq cnt2 (1+ cnt2))
                  )
                  (setq cnt3 (1+ cnt3))
                )
              )
            )
          )
        )
      )
      (vla-endundomark doc)

      (princ
        (cond
          ((zerop cnt1) "\nWIPEOUT отсутствуют")
          ((zerop cnt2) (strcat "\nУдалено " (itoa cnt3) " WIPEOUT"))
          ((zerop cnt3) (strcat "\nНевозможно удалить" (itoa cnt2) " WIPEOUT"))
          (  T
            (strcat
              "\nУдалено "
              (itoa cnt3) " WIPEOUT. Невозможно удалить "
              (itoa cnt2) " WIPEOUT"
            )
          )
        )
      )
    )

    (vla-get-ActiveDocument (vlax-get-acad-object))
    0
    0
    0
  )
  (princ)
)

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

Сегодня мне как раз насчет этого кода сообщали... Утром исправил, а выложить на сайт забыл

Версия 0.0.2

[Profan]

В первую очередь надо правильно транслятор в ArchiCAD'е настроить.

[overband]

Очень долго пытался найти причину внезапно появляющегося неработающего pasteclip-a в некоторых файлах.
Спасибо всем кто поделился своими мыслями на этот счет в этой и других темах - лично мне удалось найти причину для моего случая и надеюсь кому-то ещё это поможет.
По сути это ещё одна грань многогранной проблемы с неработающим pasteclip-ом, которая описана в этой теме
http://forum.dwg.ru/showpost.php?p=236817&postcount=8

Дело в том, что по-видимому в Автокаде есть ограничение на возможность "переваривания" определенного количества блоков (или объектов в целом, точно не знаю) в одном открытом файле.
В моем случае была следующая ситуация. В файл было подгружено внешними ссылками 3 плана dwg, сделанные в Архикаде. В каждом около 7500 блоков, так как в нём каждая стена, дверь, окно и т.д. сделаны своим уникальным блоком.
2 плана Автокад переваривает, а при подгрузке третьего, всё - pasteclip работать отказывается. Вот такая вот история. Конечно всё индивидуально. Некоторые 3 файла вместе гарантированно "вырубают" pasteclip, а некоторые нет. Однако проблема реально существует.
У меня просьба к уважаемому Profan-у и всем кто знаком с Архикадом:
Подскажите пожалуйста, как настроить этот самый "транслятор", чтобы Архикад выдавал нормальные чертежи. То есть чтобы в нём не было 7500 блоков на один план этажа, а были бы исключительно примитивы.
На данный момент я решил проблему разбитием всех блоков в файлах планов вручную, но не хочется это делать постоянно...