• На форуме с 22 января 2008г.
  • Сообщений: 130
  • Спасибо: 1

Тема: COM, листы, слои.

Подскажите, пожалуйста, возможна ли работа с листами и слоями документа AutoCAD через COM-интерфейс.
Если возможна - укажите направление. Язык реализации значения пока не имеет. Пара полезных советов и линков была бы очень кстати.
Спасибо.

  • LeonidSN
  • Активный участник
  • На форуме с 30 мая 2005г.
  • Сообщений: 1,480
  • Спасибо: 5

Re: COM, листы, слои.

Возможна:

'reference AutoCAD 2000 Type Library
Sub GetACAD()
    Dim app As AcadApplication
    On Error Resume Next
    Set app = GetObject(, "AutoCAD.Application")
    If Error Then
        Set app = CreateObject("AutoCAD.Application")
    End If
    Dim doc As AcadDocument
    Set doc = app.ActiveDocument
    Dim vLayout As AcadLayout
    Set vLayout = doc.ActiveLayout
    Dim vLayer As AcadLayer
    Set vLayer = doc.ActiveLayer
End Sub

  • ShaggyDoc
  • Восстановленный участник
  • На форуме с 10 сентября 2001г.
  • Сообщений: 1,761
  • Спасибо: 0

Re: COM, листы, слои.

Открываете acadauto.chm - и там вся объектная модель. С примерами на VBA, но я язык программирования, как справедливо указано, значения не имеет.

  • На форуме с 22 января 2008г.
  • Сообщений: 130
  • Спасибо: 1

Re: COM, листы, слои.

LeonidSN, ShaggyDoc спасибо за помощь.