Передача массива строк из Delphi в C++ DLL: решение проблемы

Delphi , Файловая система , DLL и PlugIns

При работе с внешними библиотеками на C++ из среды разработки Delphi часто возникают вопросы, связанные с передачей данных. Одним из таких вопросов является корректная передача массива строк из Delphi в C++ DLL. В данной статье мы рассмотрим, как правильно настроить взаимодействие между Delphi и C++ кодом, чтобы избежать ошибок, связанных с доступом к памяти.

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

Пользователь столкнулся с проблемой при попытке вызвать функцию Hello, определенную в C++ DLL. Функция принимает целое число и массив строк. Пример сигнатуры функции на C++:

int __stdcall Hello(int numFiles, char **inFiles)

Пользователь пытался обернуть эту функцию в Delphi, используя следующий код:

function Hello(numFiles: Integer; InFiles: PPChar): Integer; stdcall; external 'dll2.dll';

Затем был выполнен вызов функции с созданием массива строк:

var
  Files: array of PChar;
begin
  SetLength(Files, 2);
  Files[0] := PChar('siema.jpg');
  Files[1] := PChar('siema2.jpg');
  c := Hello(2, @Files[0]);
end;

Однако вместо ожидаемого результата был получен "Access violation".

Альтернативный ответ и комментарии

В комментариях к вопросу было предложено использовать PAnsiChar вместо PChar, так как в Delphi 2009 и выше AnsiChar соответствует char на C++. Также было рекомендовано ознакомиться с статьей о конвертации типов.

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

Проблема, с которой столкнулся пользователь, заключалась в неправильной передаче массива строк из Delphi в C++ DLL. Для корректной работы необходимо использовать PAnsiChar вместо PChar, чтобы соответствовать типу char* в C++.

Вот как должна выглядеть функция в Delphi:

function Hello(numFiles: Integer; InFiles: PPAnsiChar): Integer; stdcall;
  external 'dll2.dll';

Вызов функции должен быть выполнен следующим образом:

var
  Files: array of PAnsiChar;
  retval: Integer;
begin
  SetLength(Files, 2);
  Files[0] := PAnsiChar('siema.jpg');
  Files[1] := PAnsiChar('siema2.jpg');
  retval := Hello(Length(Files), PPAnsiChar(Files));
  if retval <> 0 then
    // Обработка ошибки
end;

Использование PPAnsiChar позволяет корректно передать массив строк в C++ функцию. Важно также учитывать, что возвращаемое функцией Hello значение является кодом ошибки, а первый параметр функции указывает количество передаваемых файлов.

Заключение

При передаче данных из Delphi в C++ DLL важно правильно определить типы данных и следовать семантике параметров. В данном случае использование PAnsiChar вместо PChar позволило устранить ошибку доступа к памяти и обеспечить корректную работу с внешней библиотекой.

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

Проблема заключается в неправильной передаче массива строк из Delphi в C++ DLL, которая была решена путем использования `PAnsiChar` вместо `PChar` для соответствия типу `char*` в C++.

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

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

:: Главная :: DLL и PlugIns ::