• igor
  • Восстановленный участник
  • На форуме с 30 августа 2002г.
  • Сообщений: 37
  • Спасибо: 0

Тема: Bind unloaded xref

При попытке bind xref который unload прога вываливается с ошибкой. Как узнать его статус и detach нафиг?
Тут чел спрашивал год назад - никто не ответил. Мож кто поумнел за это время

  • Leonid
  • Восстановленный участник
  • На форуме с 16 июня 2003г.
  • Сообщений: 389
  • Спасибо: 0

Re: Bind unloaded xref

Может быть просто поставить обработчик ошибок - спрограммировать реакцию на Err.Number = 91?

  • Solik
  • Восстановленный участник
  • На форуме с 30 апреля 2005г.
  • Сообщений: 6
  • Спасибо: 0

Re: Bind unloaded xref

А дальше что ???

  • Leonid
  • Восстановленный участник
  • На форуме с 16 июня 2003г.
  • Сообщений: 389
  • Спасибо: 0

Re: Bind unloaded xref

Можно определить статус XRef косвенно по состоянию объекта XRefDatabase:

Dim Obj_XRefDatabase As AcadDatabase
    Dim MyXRef As AcadExternalReference
    On Error Resume Next
        Set Obj_XRefDatabase = MyXRef.XRefDatabase
            If (Err.Number = 0) Then
                MsgBox "XRef " & MyXRef_Name & " loaded!"
            ElseIf (Err.Number = -2145386390) Then
                MsgBox "XRef " & MyXRef_Name & " unloaded!"
            End If
        End If
Solik пишет:

А дальше что ???

...и detach нафиг?

  • igor
  • Восстановленный участник
  • На форуме с 30 августа 2002г.
  • Сообщений: 37
  • Спасибо: 0

Re: Bind unloaded xref

это уж тут было
https://www.caduser.ru/forum/topic4368.html

  • igor
  • Восстановленный участник
  • На форуме с 30 августа 2002г.
  • Сообщений: 37
  • Спасибо: 0

Re: Bind unloaded xref

но всеравно спасибо