Обсуждение видеоуроков AutoCAD VBA

Автор Тема: Обсуждение видеоуроков AutoCAD VBA  (Прочитано 77379 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Khasan Mamaev

  • ADN Club
  • Сообщений: 44
  • Карма: 7
    • Конструктивный диалог
  • Skype: wolfram222
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #135 : 04-06-2017, 13:16:54 »
Приветствую друзья! Пишу скрипт для печати списка листов, код такой:
objPlot.SetLayoutsToPlot(layNames)
objPlot.PlotToDevice('Adobe PDF')

для каждого листа открывается окошко и нужно вручную нажимать кнопку "Сохранить". Возможно ли исключить эту ручную операцию?

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 12560
  • Карма: 1632
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #136 : 04-06-2017, 13:21:34 »
введение в код строчки
Код - Visual Basic [Выбрать]

    backgroundplot = 0

не решило проблему
И не должно было. Проблему должно было бы решить вот это:

Код - Visual Basic [Выбрать]
  1. ThisDrawing.SetVariable "backgroundplot", 0
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 12560
  • Карма: 1632
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #137 : 04-06-2017, 13:24:08 »
для каждого листа открывается окошко и нужно вручную нажимать кнопку "Сохранить".
Какое окошко? С запросом сохранения чертежа? Тогда сохрани его сам до запуска печати.
Код - Visual Basic [Выбрать]
  1. ThisDrawing.Save
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Khasan Mamaev

  • ADN Club
  • Сообщений: 44
  • Карма: 7
    • Конструктивный диалог
  • Skype: wolfram222
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #138 : 04-06-2017, 13:25:50 »
Какое окошко? С запросом сохранения чертежа? Тогда сохрани его сам до запуска печати.
Код - Visual Basic [Выбрать]
Сохранять печатаемый pdf файл

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 12560
  • Карма: 1632
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #139 : 04-06-2017, 13:29:48 »
Сохранять печатаемый pdf файл
А вот это сообщение вряд ли можно убрать - его выдаёт драйвер печати. Если конечно это не сообщение о том, что такой файл уже существует. В этом случае его достаточно удалить до печати.
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Khasan Mamaev

  • ADN Club
  • Сообщений: 44
  • Карма: 7
    • Конструктивный диалог
  • Skype: wolfram222
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #140 : 04-06-2017, 17:24:15 »
Сохранять печатаемый pdf файл
А вот это сообщение вряд ли можно убрать - его выдаёт драйвер печати. Если конечно это не сообщение о том, что такой файл уже существует. В этом случае его достаточно удалить до печати.
задача решается редактированием реестра https://stackoverflow.com/questions/2075104/bypass-adobe-pdf-printer-savefileas-prompt

Оффлайн AskarZ

  • ADN OPEN
  • Сообщений: 6
  • Карма: 0
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #141 : 16-06-2017, 22:46:36 »
Здравствуйте! Еще раз хочу попросить о помощи. Имеется код по пакетной печати:

Извините, вам запрещён просмотр содержимого спойлеров.

В чертежах форматы листов разные (A4, A3, A2x4 и тд), рамки форматов у меня из дин. блока с выбором размера формата. Что нужно прописать вместо EffectiveName = "A1", чтобы указывалось не имя блока, а значение выбора. Спасибо за помощь!

Оффлайн Владимир Шу

  • ADN Club
  • *****
  • Сообщений: 565
  • Карма: 125
    • ПГСу Бложик
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #142 : 17-06-2017, 11:06:47 »
В чертежах форматы листов разные (A4, A3, A2x4 и тд), рамки форматов у меня из дин. блока с выбором размера формата. Что нужно прописать вместо EffectiveName = "A1", чтобы указывалось не имя блока, а значение выбора.

Т.к. вопрос абстрактный, то и ответ будет таким же.
Можно открыть справку по VBA и посмотреть раздел посвященный объекту BlockReference (ActiveX), с удивлением обнаружить там свойство IsDynamicBlock (ActiveX) и метод GetDynamicBlockProperties (ActiveX) и поработать с ними.

З.Ы.
Хотя я так и не понял, каким образом Ваш вопрос соотносится с темой обсуждения видеоуроков, т.к. очевидно, что Вы решаете какие то свои задачи.

Оффлайн AskarZ

  • ADN OPEN
  • Сообщений: 6
  • Карма: 0
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #143 : 17-06-2017, 11:44:34 »
Владимир Шу, Код взят из 16-ого видео урока по пакетной печати. Спасибо за наводку про метод GetDynamicBlockProperties.  Нашел на др. форуме такой вот код:

Извините, вам запрещён просмотр содержимого спойлеров.

Но так как я незнаю vba, я не могу привязать этот код в свой.


« Последнее редактирование: 17-06-2017, 13:08:11 от AskarZ »

Оффлайн Владимир Шу

  • ADN Club
  • *****
  • Сообщений: 565
  • Карма: 125
    • ПГСу Бложик
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #144 : 17-06-2017, 12:59:18 »
16 урок посвящен пакетной печати, работа с дин. блоками приведена в 17 уроке. Нда...

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 12560
  • Карма: 1632
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #145 : 17-06-2017, 13:21:36 »
Но так как я незнаю vba, я не могу привязать этот код в свой.
Так дело не пойдёт. Если не знаешь VBA, то изучи его.
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн wavaw

  • ADN OPEN
  • Сообщений: 21
  • Карма: 0
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #146 : 19-06-2017, 12:02:21 »
AskarZ, как один из вариантов "подгона для себя" можете мой код глянуть. тоже из 16 урока переделывал и с общей помощью "допилил" до работающего варианта.

Извините, вам запрещён просмотр содержимого спойлеров.

Оффлайн moland

  • ADN OPEN
  • Сообщений: 7
  • Карма: 0
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #147 : 09-10-2017, 16:34:04 »
Здравствуйте. Подскажите пож-та как лучше всего делать параметрические чертежи. Но данные брать из экселя.
Вообще подскажите как быстрее всего чертить однотипные чертежи но с разными размерами.
Как  скажем построить треугольник по 2 сторонам и углу между ними посредство VBA. Есть ли в видеоуроках такое. Это будет VBA  или автокад позволяет брать данные из внешних файлов.
В примере меняем размер d1 перестраивается весь чертеж.

Оффлайн Владимир Шу

  • ADN Club
  • *****
  • Сообщений: 565
  • Карма: 125
    • ПГСу Бложик
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #148 : 09-10-2017, 16:43:39 »
Вообще подскажите как быстрее всего чертить однотипные чертежи но с разными размерами.
Использовать динамические блоки.
Как  скажем построить треугольник по 2 сторонам и углу между ними посредство VBA.
Вспомнить школьные уроки по тригонометрии и по векторной алгебре.
Есть ли в видеоуроках такое.
Посмотрите уроки...
Это будет VBA  или автокад позволяет брать данные из внешних файлов.
Вообще не понятно про что это предложение.

Оффлайн moland

  • ADN OPEN
  • Сообщений: 7
  • Карма: 0
Re: Обсуждение видеоуроков AutoCAD VBA
« Ответ #149 : 09-10-2017, 19:31:33 »
 ОК СПАСИБО.  ПЕРЕИНАЧУ ВОПРОС.  НАЗОВИТЕ САМЫЙ БЫСТРЫЙ СПОСОБ ВЫВОДА НА ЭКРАн 12ти угольника.  Есть таблица в экселе с 100 видами 12 ти угольников.  Стороны 12ти угольников рассчитываются.   Может можно и без экселя обойтись.  Подскажите как,  дайте направление.