FPC 3.2.2: как экспортировать переменную или функцию под другим именем в Delphi/Pascal?

Delphi , Компоненты и Классы , Модули

При разработке библиотек (DLL) на Delphi или Pascal (в частности, с использованием Free Pascal Compiler - FPC), часто возникает необходимость экспортировать переменные и функции под именами, отличными от тех, что используются внутри кода. Это может быть полезно для обеспечения совместимости с другими языками программирования, упрощения API или избежания конфликтов имен.

В этой статье мы рассмотрим, как это можно сделать в FPC 3.2.2, основываясь на обсуждении, возникшем на форуме.

Экспорт переменных под другим именем

Исходная проблема заключалась в попытке экспортировать переменную sError_TButton_isinit под именем mErr8001. Первоначальная попытка использования синтаксиса [public, alias: 'mErr8001']; export; привела к ошибке компиляции.

Решение:

FPC предоставляет более простой и понятный способ экспорта переменных под другим именем, используя ключевое слово name:

var
  sError_TButton_isinit: AnsiString = 'TButton: bereits init.'; export name 'mErr8001';

Этот код экспортирует переменную sError_TButton_isinit из DLL, но под именем mErr8001. Таким образом, при использовании DLL из другого приложения, переменная будет доступна именно под этим именем.

Экспорт функций/процедур под другим именем

Следующий вопрос касался экспорта функций и процедур, особенно в контексте перегруженных функций (функций с одинаковым именем, но разными параметрами).

Решение:

Для экспорта функций и процедур под другим именем также используется ключевое слово name, но синтаксис немного отличается. Вместо указания export name '...' сразу после объявления функции, экспорт производится в секции exports:

function utf16__toutf8(utf16: pwidechar): RawByteString; stdcall;
begin
  // Реализация функции
  Result := 'Some UTF-8 string'; // Пример
end;

exports
  utf16__toutf8 name 'utf16__toutf8_pwc';

В этом примере функция utf16__toutf8 экспортируется под именем utf16__toutf8_pwc. Обратите внимание, что функция должна быть определена до секции exports.

Важное замечание о перегруженных функциях:

Как правильно было отмечено в обсуждении, невозможно экспортировать разные процедуры/функции с одинаковым именем. Каждое экспортируемое имя должно быть уникальным в пределах DLL. Если у вас есть перегруженные функции, вам придется экспортировать каждую из них под уникальным именем.

Альтернативное решение для перегруженных функций:

Если необходимо сохранить логику перегрузки, можно создать "диспетчерскую" функцию, которая будет принимать параметры и, в зависимости от их типов или значений, вызывать нужную перегруженную функцию внутри DLL. Эта "диспетчерская" функция будет экспортироваться под одним именем, а внутренняя логика перегрузки останется скрытой внутри DLL.

Пример:

function MyFunctionDispatcher(ParamType: Integer; Param1: Integer; Param2: String): String; stdcall;
begin
  case ParamType of
    1: Result := MyFunction(Param1); // Вызов MyFunction(Integer)
    2: Result := MyFunction(Param2); // Вызов MyFunction(String)
  else
    Result := 'Error: Invalid ParamType';
  end;
end;

function MyFunction(Value: Integer): String;
begin
  Result := 'Integer: ' + IntToStr(Value);
end;

function MyFunction(Value: String): String;
begin
  Result := 'String: ' + Value;
end;

exports
  MyFunctionDispatcher name 'MyFunction';

В этом примере, функция MyFunctionDispatcher экспортируется под именем MyFunction. Она принимает параметр ParamType, который определяет, какую версию MyFunction (с Integer или String) нужно вызвать. Это позволяет имитировать перегрузку на стороне вызывающего приложения, даже если DLL экспортирует только одну функцию с именем MyFunction.

Заключение

FPC предоставляет удобный способ экспорта переменных, функций и процедур под другими именами с помощью ключевого слова name. При работе с перегруженными функциями необходимо учитывать ограничение на уникальность экспортируемых имен и, при необходимости, использовать "диспетчерские" функции для сохранения логики перегрузки. Использование этих техник позволяет создавать гибкие и совместимые DLL библиотеки на Delphi и Pascal.

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

В FPC 3.2.2 можно экспортировать переменные и функции/процедуры из DLL под другим именем, используя ключевое слово `name` в объявлении переменной или в секции `exports`, но экспорт перегруженных функций требует уникальных имен или использования диспетчер

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

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

:: Главная :: Модули ::