Создание Delphi DLL с поддержкой COM и запуск как исполняемый файл без ошибок инициализации COM

Delphi , Синтаксис , Справочник по API-функциям

Создание Delphi DLL с поддержой COM и запуск как исполняемый файл без ошибок инициализации COM

Пользователь столкнулся с проблемой при попытке преобразовать Delphi-приложение в DLL с поддержкой COM, чтобы оно могло запускаться как исполняемый файл и как библиотека без возникновения ошибок инициализации COM. В контексте вопроса уже есть решение проблемы, но для полноты понимания процесса и возможности использования этого опыта другими разработчиками, рассмотрим подробнее, как решить данную задачу.

Проблема

Исходное приложение на Delphi с настройками {$APPTYPE GUI} (APP1) запускается корректно, но при попытке преобразовать его в DLL с помощью другого приложения (APP2), которое устанавливает флаг IMAGE_FILE_DLL в заголовке файла, возникает ошибка инициализации COM при загрузке DLL.

Решение

Для решения проблемы необходимо учесть, что Delphi использует другой механизм запуска для DLL по сравнению с C/C++ приложениями. В Delphi для DLL используется функция DllMain, а не WinMain, которая применяется для EXE. Следовательно, необходимо экспортировать функцию DllMain из вашего DLL.

Пример кода на Object Pascal, который экспортирует функцию DllMain:

function DllMain(hinstDLL: THandle; fdwReason: DWORD; lpvReserverd: Pointer): BOOL; stdcall;
begin
  // Здесь должен быть код инициализации DLL
  Result := TRUE;
end;

exports
  DllMain;

Важно убедиться, что таблица перемещения (relocation table) не удалена в релизной сборке, так как DLL требуют её при перебазировании.

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

Попытка изменить характеристики файла и изменить расширение может привести к тому, что код, скомпилированный для DLL, не будет работать как EXE. Лучше всего построить отдельные модули для DLL и EXE, а затем использовать EXE для загрузки и вызова DLL, например, с помощью rundll32. Если требуется взаимодействие через COM, можно создать COM-хост EXE, который будет использовать автоматическое маршалирование для достижения эффекта "как будто мой код находится в том же процессе".

Заключение

Для успешного создания Delphi DLL с поддержкой COM и запуска её как исполняемый файл без ошибок инициализации COM, необходимо правильно экспортировать функцию DllMain и убедиться, что таблица перемещения не удалена. Это позволит корректно инициализировать библиотеку и избежать ошибок, связанных с работой COM.

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

Пользователю необходимо создать Delphi-библиотеку DLL, поддерживающую COM, чтобы она могла корректно функционировать как в режиме выполнения, так и в режиме загрузки в качестве библиотеки, без возникновения ошибок инициализации COM.

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

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

:: Главная :: Справочник по API-функциям ::