Использование пользовательских типов из DLL в Delphi с Python и ctypes

Delphi , Синтаксис , Типы и Переменные

Проблема взаимодействия с DLL на Delphi через Python и ctypes

Вопрос пользователя касается доступа к функциям, возвращающим пользовательские типы, закодированные в DLL, созданной с использованием Delphi, с помощью Python и библиотеки ctypes. В частности, рассматривается функция MyFunc, которая возвращает запись TMyRec, содержащую массив элементов TMyItemRec.

Описание проблемы

Пользователь столкнулся с ошибкой доступа при попытке вызвать функцию MyFunc из DLL, используя Python и ctypes. Для этого были созданы классы TMyItemRec и TMyRec, которые должны были имитировать структуры, используемые в Delphi. Однако при чтении данных возникает ошибка нарушения доступа.

Подтвержденный ответ

В ответе подтверждается, что невозможно передать управляемые типы Delphi, такие как динамические массивы, в не-Delphi код. Следовательно, ожидать успешного выполнения функций с такими типами данных не приходится.

Решение проблемы заключается в перепроектировании интерфейса. Необходимо использовать простые типы и записи, содержащие простые типы. Если требуются массивы, то следует передавать указатель на первый элемент и длину, а не использовать специфические управляемые типы Delphi. Следует использовать Windows API в качестве шаблона для проектирования интерфейсов для взаимодействия.

Также стоит учесть, что в Delphi обработка возвращаемых значений функций отличается от обработки в большинстве других компиляторов Windows. Поэтому записи, которые не помещаются в регистр, следует передавать как параметры переменного типа (var parameters), а не как возвращаемые значения функций.

Альтернативный ответ и дополнительное объяснение

В последнем параграфе подчеркивается, что если размер возвращаемой записи больше размера регистра, то Delphi и другие компиляторы обрабатывают возвращаемые значения функций по-разному. Следовательно, не следует передавать записи как возвращаемые значения. Также упоминается возможность использования OLE-типов и массивов, передаваемых по ссылке (var-arrays).

Пример кода для иллюстрации

type
  TMyItemRec = record
    ID: Cardinal;
    Params: array of Pointer;
    // Здесь вместо строк следует использовать OLE-строки или указатели на строки
  end;
  TMyRec = record
    Count: Cardinal;
    Items: Pointer; // Указатель на первый элемент массива TMyItemRec
    // Длина массива (количество элементов) не передается напрямую, а должна быть известна вызывающей стороне
  end;

from ctypes import *
class TMyItemRec(Structure):
    _fields_ = [("ID", c_int), ("Params", POINTER(c_void_p))]  # Используем void_p для указателей

class TMyRec(Structure):
    _fields_ = [("Count", c_int), ("Items", POINTER(TMyItemRec))]  # Указатель на первый элемент массива

При вызове функции MyFunc из DLL, Python-код должен передать адрес начала массива и его длину как отдельные параметры.

def GetMyRec(ID):
    # Предполагаем, что массив Items уже выделен и имеет длину MyItemsLength
    # Записываем адрес начала массива в переменную
    items = cast((c_void_p * MyItemsLength)(), c_void_p)
    # Устанавливаем argtypes и restype для функции
    my_dll.MyFunc.argtypes = [c_uint, c_void_p, c_uint]  # ID, Items, Length
    my_dll.MyFunc.restype = None  # Функция не возвращает значение
    # Вызываем функцию, передавая указатель на массив и его длину
    my_dll.MyFunc(ID, items, MyItemsLength)
    # Теперь можно обращаться к данным в массиве через items
    return items

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

Создано по материалам из источника по ссылке.

Пользователь пытается взаимодействовать с DLL, созданной в Delphi, через Python и библиотеку ctypes, но сталкивается с проблемами из-за использования сложных типов данных, таких как записи с массивами.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Типы и Переменные ::