• dvim
  • Восстановленный участник
  • На форуме с 13 февраля 2004г.
  • Сообщений: 88
  • Спасибо: 0

Тема: Создание пустого Layout

Как создать программно layout пустой ,без viewporta.
А то его все равно приходится удалять и он мешает

  • brigval
  • brigval
  • Активный участник
  • Откуда: Подмосковье
  • На форуме с 11 декабря 2001г.
  • Сообщений: 2,315
  • Спасибо: 1

Re: Создание пустого Layout

Можно попробовать в настройках AutoCAD задать создание Layout без вьюпорта. Тогда и программа, вероятно, будет создвать Layout без вьюпорта.

  • VK
  • Восстановленный участник
  • На форуме с 17 марта 2003г.
  • Сообщений: 1,980
  • Спасибо: 0

Re: Создание пустого Layout

> brigval
Действительно, если в окне настроек ручками убрать галку - то создается лист без вьюпорта. А если ту же галку убирать и восстанавливать программно - ерунда какая то получается.....
Вот код

Sub addLayout()
  Dim lcv
  Dim dis
  Set dis = Application.Preferences.Display
  lcv = dis.LayoutCreateViewport
  dis.LayoutCreateViewport = False
  ActiveDocument.Layouts.Add ("newMyLayer")
'  dis.LayoutCreateViewport = lcv
End Sub

В таком виде создается чистый лист. Но если раскомментировать последнюю строку - то создается лист с вьюпортом..... Такое ощущение, что последние две строки при отработке меняются местами....

  • dvim
  • Восстановленный участник
  • На форуме с 13 февраля 2004г.
  • Сообщений: 88
  • Спасибо: 0

Re: Создание пустого Layout

Спасибо Огромное, Работает!