Как исправить ошибку BadImageFormatException при вызове Delphi DLL из C#

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

Ошибка BadImageFormatException обычно возникает из-за несоответствия разрядности между модулями, которые пытаются взаимодействовать друг с другом. В данном случае, если ваша библиотека, созданная в Delphi XE6, является 64-битной, то и ваш проект на C# должен быть 64-битным, и наоборот.

Шаг 1: Проверка разрядности

Убедитесь, что разрядность вашего проекта C# соответствует разрядности библиотеки Delphi. В C# это можно сделать, изменив платформу сборки (Assembly Platform Target) на x64 в свойствах проекта.

Шаг 2: Исправление кода Delphi

В вашем коде на Delphi есть несколько проблем, которые необходимо исправить:

1. Вы используете PAnsiChar для возвращаемой строки, но это неверно, так как функция работает с Unicode-строкой.
2. Вы возвращаете указатель на локальную переменную, которая будет уничтожена после выхода из функции.

Исправленный вариант функции на Delphi может выглядеть так:

function GeraChave(Action : PChar; StrCrip : PChar; Cnpj : PChar; idPC: PChar; Result : PChar; var Len : Integer): Integer; stdcall;
var
  KeyLen, KeyPos, OffSet, SrcPos, SrcAsc, TmpSrcAsc, Range, I: Integer;
  Dest, Key: String;
  matKey: array[0..7] of string;
begin
  // ... ваш код ...
  SetLength(Result, Length(Dest) + 1);
  StrLCopy(Result, Dest, Length(Dest));
  Len := Length(Dest);
  Result[Len] := #0;
  Result := PChar(Result);
  Result := 1; // Возвращаем код успеха
end;

Шаг 3: Исправление кода C

В C# вам нужно изменить тип возвращаемой строки на StringBuilder и передать его в функцию как параметр:

public static extern int GeraChave(string xAction, string StrCrip, string Cnpj, string idPC, StringBuilder Saida, ref int len);
StringBuilder str = new StringBuilder(256);
int len = str.Capacity;
int retval = GeraChave(xTp, strCrip, Cnpj, IDPC, str, ref len);
string xRes = str.ToString(0, len);

Шаг 4: Тестирование

После внесения изменений в оба проекта, перекомпилируйте их и проверьте, что ошибка BadImageFormatException больше не возникает при вызове функции из C#.

Заключение

Следуя этим шагам, вы должны исправить ошибку BadImageFormatException и успешно вызвать функцию из Delphi DLL из вашего проекта на C#. Обратите внимание, что правильное управление памятью и соответствие разрядности являются ключевыми моментами для успешного взаимодействия между C# и Delphi.

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

необходимо исправить ошибку BadImageFormatException, возникающую при вызове Delphi DLL из C# приложения, путём проверки и исправления разрядности и кода обеих систем.

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

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

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