Как получить список канонических имен для плоттера?

Автор Тема: Как получить список канонических имен для плоттера?  (Прочитано 2390 раз)

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

Оффлайн Пашин Евгений

  • ADN PRO
  • *
  • Сообщений: 607
  • Карма: 7
  • Skype: pashin.evgeniy
ARXDBG и MGDDBG - утилиты для анализа AutoCAD, чертежа и т.д.

Работает :) Только я не знаю где посмотреть все канонические имена форматов принтера.

Оффлайн Александр РивилисАвтор темы

  • Administrator
  • *****
  • Сообщений: 6682
  • Карма: 731
  • Рыцарь ObjectARX
  • Skype: rivilis
Работает :) Только я не знаю где посмотреть все канонические имена форматов принтера.
Пашин Евгений
Посмотри этот пример: http://help.autodesk.com/view/ACD/2016/ENU/?guid=GUID-946669A9-E813-4D12-828A-44986E388AA2
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Пашин Евгений

  • ADN PRO
  • *
  • Сообщений: 607
  • Карма: 7
  • Skype: pashin.evgeniy
Посмотри этот пример: http://help.autodesk.com/view/ACD/2016/ENU/?guid=GUID-946669A9-E813-4D12-828A-44986E388AA2

Работает!!! И без всяких заморочек с _pagesetup и код запредельно простой.


Код - vb.net [Выбрать]
  1. Imports Autodesk.AutoCAD.Runtime
  2. Imports Autodesk.AutoCAD.DatabaseServices
  3. Imports Autodesk.AutoCAD.PlottingServices ' Чтобы можно было определить PlotConfigManager и всю информацию о плоттерах
  4. Public Class GALLURGY_ACCORECONSOLE_NETLOAD
  5.     <CommandMethod("GALGETCANONICALMEDIANAMESOFLAYOUTS")>
  6.     Public Sub GALGETCANONICALMEDIANAMESOFLAYOUTS()
  7.         Dim acDoc As Autodesk.AutoCAD.ApplicationServices.Document = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument
  8.         ' Новый PlotSettings
  9.         Using plSet As PlotSettings = New PlotSettings(True)
  10.             Dim acPlSetVdr As PlotSettingsValidator = PlotSettingsValidator.Current
  11.             ' Устанавливаем плоттер и формат, НО я решил попробовать ничего в формат не добавлять!!! Только имя принтера!!!
  12.             acPlSetVdr.SetPlotConfigurationName(plSet, "DWG_To_PDF_Gallurgy.pc3", Nothing)
  13.             Dim cnt As Integer = 0
  14.             For Each mediaName As String In acPlSetVdr.GetCanonicalMediaNameList(plSet)
  15.                 ' Вывод имён по каноническому имени mediaName
  16.                 MsgBox(mediaName & " | " & acPlSetVdr.GetLocaleMediaName(plSet, cnt))
  17.                 cnt = cnt + 1
  18.             Next
  19.         End Using
  20.     End Sub
  21. End Class
  22.  

Намного проще, чем мне казалось.

Оффлайн Пашин Евгений

  • ADN PRO
  • *
  • Сообщений: 607
  • Карма: 7
  • Skype: pashin.evgeniy
Александр Наумович, огромное Вам спасибо! Разобрался!!! У этой темы вроде бы нет решения, так может это решение отметим?!

Оффлайн Пашин Евгений

  • ADN PRO
  • *
  • Сообщений: 607
  • Карма: 7
  • Skype: pashin.evgeniy
Я думаю, стоит и статью по данной теме переписать.

Оффлайн Александр РивилисАвтор темы

  • Administrator
  • *****
  • Сообщений: 6682
  • Карма: 731
  • Рыцарь ObjectARX
  • Skype: rivilis
Я думаю, стоит и статью по данной теме переписать.
Я другую статью написал: http://adn-cis.org/kak-poluchit-spisok-dostupnyix-plotterov-formatov-v-autocad.html
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Пашин Евгений

  • ADN PRO
  • *
  • Сообщений: 607
  • Карма: 7
  • Skype: pashin.evgeniy