Перейти к содержанию

gizmo_zx

Пользователи
  • Публикаций

    22
  • Зарегистрирован

  • Посещение

Репутация

2 Обычный

Информация о gizmo_zx

  • Звание
    Посетитель

Посетители профиля

1 665 просмотров профиля
  1. Можно, наверно, через поля замутить. В Mleader пихать поле с ссылкой на блок (атрибут). Предположительно в СПДС это так реализовано?
  2. код на VB.net работает, выноска создается. Остался вопрос как добраться атрибутов блока и привязаться к ним. Вроде через интерфейс это доступно, а как програмно наковырять? Работает в голой платформе без СПДС
  3. Хотелось бы обойтись без СПДС. Мне бы хотелось некоторые действия с атрибутами поделать. т.е. если блок "имя1" то сделать выноску три строки (артрибут1 , 2 и3, если "имя2" две строки (артрибут1 , 2)
  4. Бодрого дня. Нужен пример VBA или Vb.net для создания многострочной выноски, где текст строки мультивыноски привязывается к атрибуту выбранного блока. При изменении атрибута блока, текст выноски меняется. Руками делаю так, создать мультивыноску, щелкнуть по строчке взять с чертежа, указываю блок, выбираю что взять из свойств блока.
  5. Если влепить: ThisDrawing.ModelSpace.Layout.PlotType = "4" а не acWindow Начинает работать с рамкой. Но печатает "предыдущую" настройку, т.е. после отработки макроса, нажимаю настройку печати, Nanocad говорит: "Внимание! настройки печати были изменены в другой программе. Применить их вместо настроек печати nanoCad" Я так понимаю, применение макроса меняет настройки, но не может их применить. Как его заставить их применить?
  6. В чем проблема, я так и не понял. В Acade код работает как надо. Причем в Acade не зависит от последовательности: 'ThisDrawing.ModelSpace.Layout.PlotType = acWindow 'выделение рамкой. ThisDrawing.ModelSpace.Layout.SetWindowToPlot t1, t2 Или наоборот. В Nanocade область печати все равно стоит в "экран"
  7. Все равно соскакивает на "экран" ThisDrawing.ModelSpace.Layout.PlotType = acExtents - закоментил Utility.TranslateCoordinates(p1, acWorld, acDisplayDCS, False) - координаты перевел но на предпросмотре вижу, что печатается экран
  8. Хотел по быстрому перевести на vb.net вот это http://engineerbox.ru/2011/08/24/autocad-pechat-iz-modeli/ Макрос нормально работал в Autocad, с переездом на Nanocad все грустно. На Vb.net пока ничего нет, сам хотел пример глянуть. (сам то я вовсе не программист) На VBA для Excel нарыл вот чего: Вроде как подойдет для меня. Только выставляется в настройках печати - Область печати = экран Выставляю рамку, запускаю код. Печатаю в ПРФ , получаю границы экрана , а не рамку. Захожу в настройки печати , а там действительно экран. Код рабо
  9. Бодрого дня. Код взял отсюда http://fordewind.org/wiki/doku.php?id=автомат_листы К сожалению не завелся Подозреваю, что в : Function CreateLayout() Set PSVport = ThisDrawing.PaperSpace.AddPViewport(ptc, XSize, YSize) в ptc= empty На всякий случай сами файлы Plot0.xls Без имени0.dwg
  10. Бодрого дня. Есть массив пар точек (левый нижний угол, правый верхний). Хотелось бы настроить принтер в интерфейсе Nanocad. И просто задавать область печати в цикле. Подскажите рабочий примерчик печати из Vb.net.
  11. Бодрого дня. NanoCAD x64 21.0 висит на приветственном окне. Windows 8.1 x64 пустая (чистая) На других машинах все ок. На одной проблема: открывается окно приветствия и далее ничего не происходит. Несколько раз окно закрывалось, но основное окно нанокада "не отвечает". Мастер регистрации отработал. Переустановили windows ситуация сохранилась. Куда копать?
  12. Бодрого дня. А не существует ли такой утилитки для конвертации баз оборудования для Revita в базу для Электро? Т.к. эти ленивые опы (производители оборудования известных марок)не планирую дополнять/ исправлять свои базы для электро, что грустно . Типа "мы уходим в Revit"
  13. Подскажите как промотреть все сообщения темы одной страницей? http://forum.nanocad.ru/index.php?showtopic=5130 &all - не прокатило?
×
×
  • Создать...