### Устранение Зависаний в MDI-Приложениях на Delphi: Проблемы Инициализации VCL в DLL

Delphi , Компоненты и Классы , Потоки

Устранение Зависаний в MDI-Приложениях на Delphi: Проблемы Инициализации VCL в DLL

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

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

Исходя из контекста, разработчик столкнулся с проблемой, когда инициализация TApplication в VCL.Controls.pas происходит в внешней DLL, что вызывает проблемы с синхронизацией потоков. Проблема проявлялась в разных версиях Delphi (7, 2009, XE2), и кажется, что смена версии компилятора приводит к изменению порядка инициализации кода.

Разработчик также предложил альтернативный ответ, который включает в себя несколько подходов к решению проблемы:

1. Удаление всех зависимостей VCL из DLL.
2. Использование пакетов (BPL) вместо DLL.
3. Взлом: уничтожение существующего TApplication и создание нового в WinMain исполняемого файла, что позволяет избежать инициализации в DLL.

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

Дополнительно разработчик указал в комментариях, что проблема может быть связана с использованием внешних функций (external) для доступа к функциям DLL, которые загружаются ОС при старте программы, в отличие от BPL, загружаемых runtime. Это приводит к тому, что DLL загружают runtime BPL отдельно от исполняемого файла до того, как он успевает выполнить свою инициализацию.

Рассмотрение примеров кода

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

function LoadLibrary(const lpFileName: PChar): THandle; stdcall;
function GetProcAddress(hModule: THandle, lpProcName: PChar): TProc; stdcall;

procedure TMyClass.SomeFunction;
var
  DLLHandle: THandle;
  ProcHandle: TProc;
begin
  DLLHandle := LoadLibrary('PathToYourDLL.dll');
  if DLLHandle <> 0 then
  begin
    ProcHandle := GetProcAddress(DLLHandle, 'ProcedureName');
    // Вызов функции через полученный указатель
  end;
end;

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

Заключение

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

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

Контекст связан с устранением зависаний в MDI-приложениях на Delphi, вызванных проблемами инициализации компонентов VCL в внешних DLL, что влияет на работу потоков и синхронизацию в программе.

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

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

:: Главная :: Потоки ::