Python & ActiveX/COM Autocad

[dlobyntsev]

Тут ещё накладывается не всегда понятное взаимодействие Python с COM через pywin32.
Когда я с вводом разбирался, особой разницы между

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

1. doc.Utility.InitializeUserInput(128, "Line Circle")

и

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

1. doc.Utility.InitializeUserInput(128)

для последующей обработки не заметил, хотя, может, и упустил что-то.
Моя фраза

достаточно сформировать строку запроса особым образом

относится только к тому,что запрос в командной строке будет выглядеть как запрос с опциями, далее я как раз и показываю, что необходимо предусмотреть в коде, чтобы опции запроса не только выглядели, как опции, но и работали соответствующим образом.
Код из официальной справки VBA действует абсолютно по той же схеме, обрабатывая ошибки при вводе значений опций:

Код - Visual Basic [Выбрать]

1. If Err Then
2.          If StrComp(Err.Description, "User input is a keyword", 1) = 0 Then

просто я вместо текста ошибки "User input is a keyword" отслеживаю её по коду -2145320928

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

1. errnumber = error.excepinfo[-1]
2.     if errnumber == -2145320928:

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

Я в питоне дуб-дубом, немного только соображаю на предмет COM-взаимодействия
Насколько я понимаю, если не ввести ключевые слова, пользователь получает возможность вводить любую абракадабру.

[dlobyntsev]

Пользователь в любом случае имеет возможность ввести любую абракадабру, просто если ввод инициализирован как

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

1. doc.Utility.InitializeUserInput(128, "Line Circle")

то при обработке ошибки "User input is a keyword" метод doc.Utility.GetInput() вернет "Circle" при вводе C, c, Circle или CIRCLE, "Line" при вводе L, l, Line или LINE. В остальных случаях - то, что ввёл пользователь.
А если ввод инициализирован как

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

1. doc.Utility.InitializeUserInput(128)

метод doc.Utility.GetInput() будет всегда возвращать то, что ввёл пользователь.
Вся разница только в обработке пользовательского ввода, но она не принципиальна, т.к. обработку, аналогичную той, что выполняет autocad, можно без проблем выполнить и в своём коде.

[Electric]

Заметил сегодня такую ошибку. Вызываю выделение мышью объектов:

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

1. aDoc.Utility.Prompt("Укажите область на экране")
2. selection = aDoc.SelectionSets.Add("test")
3. selection.SelectOnScreen()

Если я выделяю область мышью - все работает. Но если я хочу выделить все объекты и по привычке нажимаю сочетание CNTRL+A - команда выделения в автокаде тут же прерывается. Далее по коду в Python при обращении к selection выдает ошибку, как если selection пуст:

File "C:\Program Files\Python\lib\site-packages\win32com\client\dynamic.py", line 252, in __getitem__
    raise TypeError("This object does not support enumeration")

Возможно ли как-то обработать это исключение в Python  и разрешить выделение сразу всех объектов?

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

Но если я хочу выделить все объекты и по привычке нажимаю сочетание CNTRL+A - команда выделения в автокаде тут же прерывается.

Всё правильно. Так и должно быть. У AutoCAD свои правила и их следует соблюдать. Вместо CTRL+A нужно жать _A и пробел/ввод (в английской версии можно просто A (латиница), а в русской В (кириллица)). CTRL+A при стандартных настройках запускает прерывание команды и команду _ai_selall.

[dlobyntsev]

Вместо CTRL+A нужно жать _A и пробел/ввод (в английской версии можно просто A (латиница), а в русской В (кириллица)).

Небольшое уточнение:

• Autocad 2018 Eng - A или a не работают, нужно ввести al или all в любом регистре.
• Autocad 2018 Rus - соответственно не работает _A и _a, необходимы _al или _all в любом регистре, при этом кириллические в, все в любом регистре работают.

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

Небольшое уточнение:

    Autocad 2018 Eng - A или a не работают, нужно ввести al или all в любом регистре.
    Autocad 2018 Rus - соответственно не работает _A и _a, необходимы _al или _all в любом регистре, при этом кириллические в, все в любом регистре работают.

Мой промах. A, _A не срабатывают, так как воспринимаются как _ADD, а не как _ALL. В русской локализации же эквивалент _ALL - это Все, а эквивалент _ADD - Добавить, т.е. достаточно одной буквы для того, чтобы понять какая опция выбора введена.

[Electric]

Еще такой вопрос по выделению объектов рамкой.
Не могу разобраться с параметрами выделения в object.SelectOnScreen [FilterType][, FilterData]

К примеру, если я хочу выделить не все объекты, а только отрезки и прямоугольники сразу. Любые варианты вроде этого:

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

1. selection.SelectOnScreen(0, "AcDbPolyline")

выдают ошибку:

File "<COMObject Add>", line 3, in SelectOnScreen
pywintypes.com_error: (-2147352567, 'Ошибка.', (0, 'AutoCAD', 'Недопустимый аргумент FilterType в SelectOnScreen', 'C:\\Program Files\\AutoCAD\\HELP\\OLE_ERR.CHM', -2145320939, -2147024809), None)

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

Настоятельно советую изучать справку по VBA - там многое описано:

Код - Visual Basic [Выбрать]

1. Sub Example_Select()
2.     ' This example adds members to a selection set, first by crossing and
3.    ' then by filtering for circles.
4.    
5.     ' Create the selection set
6.    Dim ssetObj As AcadSelectionSet
7.     Set ssetObj = ThisDrawing.SelectionSets.Add("SSET")
8.    
9.     ' Add all object to the selection set that lie within a crossing of (28,17,0) and
10.    ' (-3.3, -3.6,0)
11.    Dim mode As Integer
12.     Dim corner1(0 To 2) As Double
13.     Dim corner2(0 To 2) As Double
14.    
15.     mode = acSelectionSetCrossing
16.     corner1(0) = 28: corner1(1) = 17: corner1(2) = 0
17.     corner2(0) = -3.3: corner2(1) = -3.6: corner2(2) = 0
18.     ssetObj.Select mode, corner1, corner2
19.    
20.     ' Add all the Circles to the selection set that lie within the crossing of (28,17,0) and
21.    ' (-3.3, -3.6,0) by filtering from the current drawing
22.    Dim gpCode(0) As Integer
23.     Dim dataValue(0) As Variant
24.     gpCode(0) = 0
25.     dataValue(0) = "Circle"
26.    
27.     Dim groupCode As Variant, dataCode As Variant
28.     groupCode = gpCode
29.     dataCode = dataValue
30.    
31.     ssetObj.Select mode, corner1, corner2, groupCode, dataCode
32.    
33. End Sub

Тебе нужен последний пример.

[Electric]

Настоятельно советую изучать справку по VBA - там многое описано:

Тебе нужен последний пример.

Насколько я понимаю из VBA, эти gpCode и ataValue(0) - это массивы, в нулевое  значение  которых записываются DXF group code  и значение фильтра соответственно. Когда я пытаюсь то же самое проделать в Python, это не приводит ни к какому  результату, ошибка  та же.

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

Это не массивы, а Variant'ы, в которые всунуты типовые массивы. Для FilterType - это short (не знаю точно как он обозначатся в Python, но это System.Int16 в .NET), для FilterData это Variant (в данном случае строка "LWPOLYLINE", а не "AcDbPolyline").

[Electric]

Добрый день!
Требуется начертить график в  определенной пустой области пространства модели автокада, которую я хочу выделить прямоугольником. Хочу сделать диалоговое меню, чтобы выделить эту область.
В данный момент я реализовал это через указание нижней  левой и верхней правой точек с помощью Utility.GetPoint(), для получения крайних координат рамки. Но как-то это не эстетичный метод, возможно ли реализовать это через выделение области прямоугольной рамкой? Стандартное выделение SelectByPolygon, как я понимаю, возвращает только набор объектов, но не координаты.

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

В данный момент я реализовал это через указание нижней  левой и верхней правой точек с помощью Utility.GetPoint(), для получения крайних координат рамки. Но как-то это не эстетичный метод, возможно ли реализовать это через выделение области прямоугольной рамкой?

Можно. Посмотри в сторону Utility.GetCorner(). Первую точку через Utility.GetPoint(), вторую через Utility.GetCorner().

[Randum]

Здравстуйте, пытаюсь получить данные из ячейки таблицы используя модуль pywin32.

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

1. tab.GetCellValue(1,1)

Получаю следующую ошибку.

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

1. pywintypes.com_error: (-2147352567, 'Ошибка.', (0, None, None, None, 0, -2147467263), None)

Смотрю в документацию по функции: Function GetCellValue(row As Long, col As Long)
Т.е. я предполагаю что возможно надо python-овский тип данных int перевести в Long
Как это можно сделать?

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

Я не уверен, что проблема в этом, но вроде бы для преобразования в long в Python есть функция long().