Надежный подход к использованию MDI-приложений с плагинами в Delphi 7: загрузка и выгрузка .bpl-пакетов

Delphi , Программа и Интерфейс , MDI приложения

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

Использование указателей в общем классе

Рассмотрим пример класса TCommonClass, который используется для "обмена" компонентами между MDI-парентом и плагинами:

TCommonClass = class(TObject)
public
  MainMenu:   ^TMainMenu;
  MyClass:    ^TMyClass;
  ...
constructor TCommonClass.Create;
var
  Ctrl: array[0..999] of TComponent;
...
  for i := 0 to (Application.MainForm.ComponentCount - 1) do
  begin
    CtrlItm[i] := Application.MainForm.Components[i];
    if CtrlItm[i].ClassName = 'TMainMenu' then MainMenu := @CtrlItm[i];
    if CtrlItm[i].ClassName = 'TMyClass'  then MyClass  := @CtrlItm[i];
    ...
  end;
...
end;

При обращении к объектам используются указатели:

var
  tmp: String;
begin
  MainMenu^.Items[0].Caption := 'Something'; // Пример использования указателя
  MyClass.DoSomething;
end;

Проблемы с использованием указателей

Разработчик столкнулся с ошибками при работе с большим плагином, содержащим множество компонентов TMS. Возник вопрос о надежности подхода с использованием указателей и возможном коррупции памяти при загрузке и выгрузке .bpl-пакетов.

Альтернативный ответ и рекомендации

В ответе на вопрос поднимается тема использования интерфейсов для взаимодействия между плагинами и основным приложением. Предлагается отказаться от использования явных указателей и перейти к более безопасному и удобному механизму обмена объектами.

Пример использования интерфейсов

TCommonClass = class(TObject)
public
  MainMenu:   TMainMenu;
  MyClass:    TMyClass;
  ...
end;

Конструктор класса TCommonClass может быть изменен для прямого обращения к объектам:

constructor TCommonClass.Create;
var
  Ctrl: TComponent;
...
  for i := 0 to (Application.MainForm.ComponentCount - 1) do
  begin
    Ctrl := Application.MainForm.Components[i];
    if Ctrl is TMainMenu then MainMenu := TMainMenu(Ctrl);
    if Ctrl is TMyClass then MyClass := TMyClass(Ctrl);
    ...
  end;
...
end;

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

Заключение

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

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

При разработке MDI-приложений в Delphi 7 с использованием плагинов на основе .bpl-пакетов важно обеспечить корректную работу с указателями для взаимодействия между основным приложением и загружаемыми модулями, что может быть ненадежно и привести к ошибка

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

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

:: Главная :: MDI приложения ::