Исправление ошибки инстанцирования класса управления плагинами в Delphi XE2

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

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

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

В проекте PluginInterface.bpl определены интерфейсы для взаимодействия с плагинами и главным формой. Проект MultiPlug2.exe представляет собой главную форму с конфигурируемым меню, а TestPlugin.bpl - это тестовый плагин. В коде процедуры RefreshPluginsList менеджер плагинов ClassManager не содержит элементов, и, следовательно, регистрация плагинов не происходит.

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

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

Для исправления проблемы необходимо:

1. Убедиться, что опция "Use Runtime Packages" включена в настройках проекта.
2. Добавить PluginInterface.bpl в список требуемых пакетов в настройках проекта (Project > Options for Target 'YourProjectName' > Packages).
3. Удалить из кода попытки динамической загрузки пакета LoadPackage('PluginInterface.bpl'), так как это не требуется и может привести к ошибкам.

После выполнения этих шагов необходимо перекомпилировать проект, чтобы убедиться, что исполняемый файл действительно использует менеджер плагинов из пакета PluginInterface.bpl, а не создает свою собственную копию.

Альтернативный ответ (дополнительные шаги)

• Использовать TClassList вместо TList для управления классами плагинов, что повысит надежность и безопасность кода.
• Избегать использования констант в пакетах, которые инициализируются массивами строк, так как это может приводить к ошибкам.

Пример кода на Object Pascal (Delphi)

uses
  System.SysUtils,
  UClassManager;

type
  TPluginManager = class
  private
    FPlugins: TClassList;
  public
    property Count: Integer read FPlugins.Count;
    procedure RegisterPlugin(const APluginClass: TPluginClass);
    // ... другие методы
  end;

var
  ClassManager: TPluginManager;

Использование TClassList вместо TList поможет избежать ошибок с несоответствием типов и упростит управление классами плагинов.

Заключение

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

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

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

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

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

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