#! usr/bin/env python
# -*- coding: utf-8 -*-

import comtypes
from comtypes.client import GetModule, CreateObject
GetModule(r'C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024\Bin\x64\LiraSapr.exe')
GetModule(r'C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024\Bin\x64\LiraResAPI.dll')
from comtypes.gen import LiraSapr
from comtypes.gen import LiraSaprRes

app = CreateObject(LiraSapr.LiraApplication)
app = app.QueryInterface(LiraSapr.ILiraApplication)
doc = app.CreateNewDocument('Test_frame')
doc = doc.QueryInterface(LiraSapr.ILiraDocument)

Nodes = doc.AllTables.CreateNewItem(LiraSapr.LiraTableEnum.kLiraTable_Nodes_Coordinates)
Nodes = Nodes.QueryInterface(LiraSapr.ILiraTable)
NodesCoords = [[1, 0.0, 0.0, 0.0 ], [2, 6.0, 0.0, 0.0 ], [3, 0.0, 0.0, 3.0 ], [4, 6.0, 0.0, 3.0 ]]

def gen_tab_str(list_):
    # возвращает строки, разделенные табуляцией на основе списка
    res = ''
    for row in list_:
        s = '\t'.join(str(i) for i in row) + '\n'
        res += s
    return res

NodesCoords_str = gen_tab_str(NodesCoords)
Nodes.SetContents(NodesCoords_str)
Els = doc.AllTables.CreateNewItem(LiraSapr.LiraTableEnum.kLiraTable_Elements_TypeAndNodes)
Els = Els.QueryInterface(LiraSapr.ILiraTable)
ElTypeNodes = [[1, 10, "1, 3"], [2, 10, "2, 4"], [3, 10, "3, 4"]]
ElTypeNodes_str = gen_tab_str(ElTypeNodes)
Els.SetContents(ElTypeNodes_str)

Nodes.Apply()
Els.Apply()

Traceback (most recent call last):
  File "C:\Users\ZimnitskiiAV\Desktop\lirapythonAPI\frame_test.py", line 36, in <module>
    Nodes.Apply()
ctypes.ArgumentError: argument 1: TypeError: expected LP_BSTR instance instead of str

#! usr/bin/env python
 # -*- coding: utf-8 -*-
 
 from comtypes.client import GetModule, CreateObject
 GetModule(r'C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024 DEMO\Bin\x64\LiraSapr.exe')
 GetModule(r'C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024 DEMO\Bin\x64\LiraResAPI.dll')
 from comtypes.gen import LiraSapr
 from comtypes.gen import LiraSaprRes
 
 
 app = CreateObject(LiraSapr.LiraApplication)
 app = app.QueryInterface(LiraSapr.ILiraApplication)
 doc = app.ActiveDocument
 doc = doc.QueryInterface(LiraSapr.ILiraDocument)
 print(doc.PathName)
 
 
 selected_nodes = doc.GetSelection(Subj = LiraSapr.LiraSelEnum.kLiraSel_Ns)
 selected_elems = doc.GetSelection(Subj = LiraSapr.LiraSelEnum.kLiraSel_Els)
 selected_nodes_str = ','.join(str(i) for i in selected_nodes)
 selected_elems_str = ','.join(str(i) for i in selected_elems)
 
 print(f'Выбраны узлы: {selected_nodes_str}')
 print(f'Выбраны элементы: {selected_elems_str}')
 
 ##help(LiraSapr)
 
 result = CreateObject(LiraSaprRes.LiraResultsAccess)
 result = result.QueryInterface(LiraSaprRes.ILiraResultsAccess)
 request = result.CreateNewRequest(LiraSaprRes.LiraRequestEnum.kLiraRequest_LoadCaseDisplacement)
 request = request.QueryInterface(LiraSaprRes.ILiraLoadCaseDisplacementsRequest)
 
 request.DocumentName = doc.Title
 request.Nodes.AddFromString(selected_nodes_str)
 
 response = result.LoadCaseDisplacements(request)
 
 
 lc = 1
 
 for i in range(request.Nodes.Count):
     node = request.Nodes.Item[i]
     x = response.GetNodeX(node, lc)
     y = response.GetNodeY(node, lc)
     z = response.GetNodeZ(node, lc)
 
     print(f'Node:{node}')
     print(f'X:{x}')
     print(f'Y:{y}')
     print(f'Z:{z}\n')

from comtypes.client import GetModule, CreateObject
from comtypes.gen import LiraSaprRes

GetModule(r"C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024\Bin\x64\LiraResAPI.dll")

result = CreateObject(LiraSaprRes.LiraResultsAccess)
result = result.QueryInterface(LiraSaprRes.ILiraResultsAccess)
request = result.CreateNewRequest(LiraSaprRes.LiraRequestEnum.kLiraRequest_LoadCaseDisplacement)
request = request.QueryInterface(LiraSaprRes.ILiraLoadCaseDisplacementsRequest)

request.DocumentName = "test_file"
request.Nodes.AddFromString("1-5")

response = result.LoadCaseDisplacements(request)

lc = 1

for i in range(request.Nodes.Count):
    node = request.Nodes.Item[i]
    x = response.GetNodeX(node, lc)
    y = response.GetNodeY(node, lc)
    z = response.GetNodeZ(node, lc)

    print(f'Node:{node}')
    print(f'X:{x}')
    print(f'Y:{y}')
    print(f'Z:{z}\n')

alekstish, напишите пожалуйста пример использования метода GetSelection. Судя по описанию он принимает в качестве первого аргумента указатель pNumbers. Что под ним подразумевается?

import comtypes
import comtypes.client

LiraSaprRes = comtypes.client.GetModule(r"C:\Program Files (x86)\LIRA SAPR\LIRA SAPR 2024\Bin\x64\LiraResAPI.dll")
result = LiraSaprRes.LiraResultsAccess()
iresult = result.QueryInterface(LiraSaprRes.ILiraResultsAccess)
request = iresult.CreateNewRequest(LiraSaprRes.LiraRequestEnum.kLiraRequest_LoadCaseDisplacement)

Traceback (most recent call last):
  File "C:/lirapythonAPI/com_lira_sapr_res5.py", line 11, in <module>
    request = iresult.CreateNewRequest(LiraSaprRes.LiraRequestEnum.kLiraRequest_LoadCaseDisplacement)
_ctypes.COMError: (-2147467263, 'Не поддерживается', (None, None, None, 0, None)

У кого-нибудь есть идеи, что я делаю неправильно? Сделал реализацию и на Excel VBA, там все работает.