ObjectARX 2014

[Agens]

Да, но он не работает...
Я уже понял, что скинул Андрей, и что написал я, это одно и тоже...

Код - C# [Выбрать]

1. using Ap = Autodesk.AutoCAD.ApplicationServices;
2. ...
3. AcadDocument acadDoc = Ap.DocumentExtension.GetAcadDocument(doc) as AcadDocument;;// doc is a Document instance

Public ReadOnly Property ThisDrawing As AcadDocument
        Get
            Return Application.DocumentManager.MdiActiveDocument.GetAcadDocument()
        End Get
    End Property

[Александр Ривилис]

Второй код должен работать.

[Андрей Бушман]

В коде должны быть такие юзинги:

Код - C# [Выбрать]

1. using Autodesk.AutoCAD.Interop.Common;
2. using Autodesk.AutoCAD.Interop;
3. using Autodesk.AutoCAD.DataExtraction;
4.  

не помню, какое слово в VB.NET используется вместо using, но надеюсь, что это помнит Agens и справится с такой заменой. Скорее всего что-то из указанного у него отсутствует и при дописании всё должно заработать (при условии подключенности нужных референсов, указанных ранее в теме).

[Agens]

Вот мой код. Без (ThisDrawing) - подчеркивает Уж простите, что я так примитивно

[Андрей Бушман]

если для нэймспейсов у автора назначены псевдонимы, то вызывать методы расширения на объектах не получится и нужно вызывать их как статические методы. Об этом я так же писал выше и показывал в коде.

[Александр Ривилис]

1. Написана полная ерунда.
2. Код вставляй текстом, а не картинкой.

[Андрей Бушман]

А где в коде явное приведение к нужному типу? Кроме того, написана муть: бесконечная вложенная рекурсия, насколько я вижу.

[Agens]

1. Написана полная ерунда.

Как ерунда, если я все делал по ролику, сделанному Августом Гонсаленсом или как его там

2. Код вставляй текстом, а не картинкой.

Вставил картинкой, чтобы было видно, что замечание есть к коду...

Код: [Выделить]

Imports Autodesk.AutoCAD.Interop
Imports Autodesk.AutoCAD.Interop.Common

Public Class AGACTools
    Public ReadOnly Property ThisDrawing As AcadDocument
        Get
            Return Autodesk.AutoCAD.ApplicationServices.DocumentExtension.GetAcadDocument(ThisDrawing)
        End Get
End Property


[Александр Ривилис]

Нужны эти импорты:

Код - vb.net [Выбрать]

1. Imports Autodesk.AutoCAD.Interop
2. Imports Autodesk.AutoCAD.Interop.Common
3. Imports Autodesk.AutoCAD.ApplicationServices
4. Imports Autodesk.AutoCAD.ApplicationServices.DocumentExtension

И код для ThisDrawing вотрой из первого сообщения.

[Андрей Бушман]

Насколько я вижу, в обозначенном  выше коде свойства автор вызывает метод, передавая в качестве аргумента это же самое свойство. Т.е. цикл бесконечен.

[Agens]

Андрей, спец. для Вас выкладываю код, сделанный Автодеском, как пример миграции из VBA в VB.NET.
--
А вот тут не моя пробема описана? http://forums.autodesk.com/t5/NET/Migration-VBA-to-VBdotNet-2012-Autocad-2013/td-p/4338969

[Александр Ривилис]

Андрей, спец. для Вас выкладываю код, сделанный Автодеском

Где этот код?
Пока изучай: http://adndevblog.typepad.com/autocad/2012/05/extension-methods-in-autocad-2013.html

[Agens]

Где этот код?

http://adn-cis.org/forum/index.php?action=dlattach;topic=747.0;attach=351

[Александр Ривилис]

0-HelloWorld.rar

Этот код для версии 2010. В 2013 произошло разделенние и глобальная "перетруска".

[Agens]

Ну я так и понял... Я изучал по http://through-the-interface.typepad.com/through_the_interface/2009/04/devtv-autocad-vba-to-net-migration-basics.html.
Спс. за ссылку, Александр.
Есть что-то подобное под 2014 на русском?