[===AAA===]

Всем добрый день.

АвтоКад-2016 (русский)

"Точка начала области печати" - это смещение по X и Y,
показываемые в нижнем-левом углу диалогового окна
"Печать".

Вот фрагмент кода программы:

Код:

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

   (setq namlay (vla-item (vla-get-Layouts
       (vla-get-activedocument (vlax-get-acad-object)))(getvar "CTAB")))

Если, допустим, нужно изменить ориентацию листа, пишем что-то вроде

Код:

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

 (vla-put-PlotRotation namlay 1)

А какую строку нужно написать, чтобы начальная точка изменилась на (0 0)
или, скажем, (5 5) ?

Да, через (command "_.plot" и далее параметры) поменять её можно,
но хотелось бы сделать это через конструкцию (vla- ...) или (vlax- ...)

[Сергей812]

Если не ошибаюсь навскидку, то это PlotOrigin.

[VVA]

===AAA===, Посмотри dump объекта. Там будут все свойства и методы.

Код:

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

(vlax-dump-object
  (vla-item (vla-get-layouts
              (vla-get-activedocument (vlax-get-acad-object))
            ) ;_ end of vla-get-Layouts
            (getvar "CTAB")
  ) ;_ end of vla-item
  t
) ;_ end of vlax-dump-Object

_$ (vlax-dump-Object l t) ; IAcadLayout: Параметры печати и видимые свойства пространства модели или блока пространства листа. ; Значения свойств: ; Application (RO) = #<VLA-OBJECT IAcadApplication 0000000140013318> ; Block (RO) = #<VLA-OBJECT IAcadPaperSpace 00000000273760e8> ; CanonicalMediaName = "User256" ; CenterPlot = 0 ; ConfigName = "Universal Document Converter" ; Document (RO) = #<VLA-OBJECT IAcadDocument 0000000026fef698> ; Handle (RO) = "30C4" ; HasExtensionDictionary (RO) = -1 ; ModelType (RO) = 0 ; Name = "Лист1." ; ObjectID (RO) = 43 ; ObjectID32 (RO) = 43 ; ObjectName (RO) = "AcDbLayout" ; OwnerID (RO) = 44 ; OwnerID32 (RO) = 44 ; PaperUnits = 1 ; PlotHidden = 0 ; PlotOrigin = (5.0 5.0) ; PlotRotation = 1 ; PlotType = 5 ; PlotViewportBorders = 0 ; PlotViewportsFirst = -1 ; PlotWithLineweights = -1 ; PlotWithPlotStyles = -1 ; ScaleLineweights = 0 ; ShowPlotStyles = 0 ; StandardScale = 0 ; StyleSheet = "МИП.stb" ; TabOrder = 1 ; UseStandardScale = 0 ; ViewToPlot = "" ; Поддерживаемые методы: ; CopyFrom (1) ; Delete () ; GetCanonicalMediaNames () ; GetCustomScale (2) ; GetExtensionDictionary () ; GetLocaleMediaName (1) ; GetPaperMargins (2) ; GetPaperSize (2) ; GetPlotDeviceNames () ; GetPlotStyleTableNames () ; GetWindowToPlot (2) ; GetXData (3) ; RefreshPlotDeviceInfo () ; SetCustomScale (2) ; SetWindowToPlot (2) ; SetXData (2) T

[===AAA===]

Чего-то не получается точку задать...
Оба варианта не срабатывают:
ни
(vla-put-PlotOrigin namlay (list 10 10))
ни
(vla-put-PlotOrigin namlay 10 10)

В каком виде-то ей этот аргумент "скормить" нужно?
Или функция по-другому выглядеть должна?

[Сергей812]

Официальной справкой принципиально не пользуетесь?

[===AAA===]

Спасибочки!

Просто ожидал, что параметр должен передаваться в виде простого списка.

:-)

Ну и, если не затруднит, как сопоставить форматы бумаги типа

CanonicalMediaName = "USER9265"

из форматов принтера какому-нибудь "человеческому"

Oversize A1 (альбомная)

?

[Сергей812]

ищите по CanonicalMediaName. Пример на .Net

[===AAA===]

Да "канонические"-то у меня есть... А вот где хранятся соответствующие им
"человеческие" имена - непонятно.

Т.е. у принтеров могут быть и "человекоподобные" названия форматов, типа
А1_(841.00_х_594.00)_MM
а могут быть (вперемешку) и USERхххх.

При этом сам Автокад видит, что конкретному USERхххх сопоставлен какой-
нибудь, к примеру, "Оверсайз А1 вертикальный" - вот прямо так, русскими буквами.

[VVA]

примеры на Lisp

----- добавлено через ~2 мин. -----

Сообщение от ===AAA=== А вот где хранятся соответствующие им "человеческие" имена - непонятно.

Посмотри vla-GetLocaleMediaName

----- добавлено через ~12 мин. -----
===AAA===, Здесь в 2016 так же тебе давали ссылку на набор ф-ций Plot Device functions for AutoLISP и GetPlotDevices.lsp Free AutoLISP for AutoCAD

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

VVA, первая ссылка никуда не ведет

[===AAA===]

Всем добрый вечер!

Спасибо, в части "точки начала области печати" всё получилось.

Что касается ссылок 2016 года, то, конечно, я их смотрел, но ни

(vlax-dump-object ...) ни (vla-put-PlotOrigin ...)

я там не нашёл.

Собственно, мне и нужно-то лишь изредка название одной-другой функции,
ибо несколько отдалился я от программирования (от слова "почти совсем")
в силу изменения характера работы. Так что сорри, ежели повторюсь в
вопросах, которые для местных старожилов известны назубок.

Еще раз всем спасибо, насчёт (vla-GetLocaleMediaName ...) почитаю обязательно.

----- добавлено через ~37 мин. -----
Да, (vla-GetLocaleMediaName ...) именно то, что нужно.

А какая функция - наоборот - устанавливает "форматку" не по "каноническому", типа

(vla-put-CanonicalMediaName namlay "USER9265")

а по "человеческому" (оно же - медианейм) названию?

что-то, видимо, типа (vla-put-LocaleMediaName ... )

Подскажите, плиз.

[VVA]

===AAA===, Как вариант сделать список из "человеческого" и "канонического" названия. По "человеческому" найти соответствующее "каноническое" и уже устанавливать его с помощью vla-put-canonicalmedianame

[===AAA===]

Да, такой алгоритм действий у меня тоже наметился (исходя из предположения,
что порядок следования имён в "каноническом" и "человеческом" списках
совпадают - просто ещё не успел это проверить), но была надежда, что есть
функция, названия которой мне не ведомо.

:-)

Всё равно спасибо!

[===AAA===]

Кстати, столкнулся с интересным глюком PlotOrigin.

Заключается в том, что ориентация листа через эту функцию меняется
не для всех "форматок". У меня, например, установленный "А0"
легко меняет ориентацию через диалоговые окна Автокада и не
меняется через вызов PlotOrigin.

Для других форматок А4 ... А1 всех модификаций - всё нормально.

Т.е. нестабильненько-с... Что есть самая неприятная вещь при
программировании.

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

PlotOrigin и PlotRotation, кажется, немного разные вещи

[Сергей812]

а почему не используете наборы параметров листов? Или печать из модели идет?

[===AAA===]

Сорри, конечно же (vla-put-PlotRotation ...)

:-)

----- добавлено через ~3 мин. -----
> а почему не используете наборы параметров листов?

Да проблемы, как таковой, в общем-то и нет, т.к. всё легко делается через
(command-s "_-plot" ... параметры ...)

Просто разбирался с альтернативными вариантами.