Плагины ввиде dll на основе интерфейсов

[Человек_Борща]

Всем доброго времени суток!

Итак давно хочу нреализовть систему плагинов. Опыта в подобном плане нет. А реализовать хочется.

Нашёл пару статей: 1 2

Но хотелось бы чуть подробнее... опыта в этом плане практически нету.

К каким данным предостовлять доступ в программе?
Как правильно создавать интервейс в главной программе и что давать разработчикам плагинов?

В общем по подробнее обо все об этом=)

Если конкретно то:
Что такое интерфейсы?
Как их создавать?
Как работать с ними?
Как организовать правильную работу Главного приложения и работу плагина подключсченного к приложению по средству интерфейса?
Что давать раработчикам плагинов?
К каким данным в основной программе нужно предоставлять доступ из плагина?

Так же былобы совсем не плохо хотябы пару простых исходников на эту тему.

Ну и вопрос о том есть ли что-то более лучшее чем интерфейсы?

Так сказать, дайтте пищу для ума

[GunSmoker]

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

В частности, там есть ссылки на материал по интерфейсам:
http://www.delphikingdom.ru/asp/view...catalogid=1183
http://www.delphikingdom.ru/asp/view...catalogid=1113
http://www.delphikingdom.ru/asp/view...catalogid=1115

К каким данным предостовлять доступ в программе?

К каким сочтёшь нужным. Больше предоставишь - у плагинов больше возможностей будет. Но и больше проблем по реализации.

Проще всего предоставить к минимуму (можно вообще - к нулю) и попробовать написать несколько полезных плагинов. Наверняка столкнёшься с тем, что данных не хватает. Вот - надо их предоставить.

Как правильно создавать интервейс в главной программе и что давать разработчикам плагинов?

I := TMyImplementator.Create;

Если вопрос не про создание в run-time, а про проектирование (создание в design-time), то:
1. Не использовать типы данных Delphi, а только системные (меж-языковые).
2. Использовать safecall.

Что такое интерфейсы?

Интерфейс - это "объект без реализации". Суть его использования в том, что за реализацию отвечает плагин, а в программе используется только верхушка айсберга - интерфейс. Это грубо и неправильно, но для первого объяснения - сойдёт.

А вообще - см. ссылки выше.

Ну и вопрос о том есть ли что-то более лучшее чем интерфейсы?

В абстрактном вакууме?

На практике же: интерфейсы и COM - это наиболее удачные методы реализации системы плагинов.

[Человек_Борща]

Допустим написал такой код:

unit MyPluginInterface;

interface

uses
  Classes;

type
  ImyPlugin = interface['{D9DCFB5E-3482-443E-8B91-A4EBE83C7DB7}']
  function GetPluginName:string;
  function GetPluginDesc:string;
  end;

implementation

end.

его планируется раздавать людям(пака образно ).

Теперь проблема. Как прикрепить его к программе?

У меня в проекте ListBox и Label

при создании главной формы планируется загружать плагины. Значение возвращенные function GetPluginName:string;заносится именем в listBox

При выборе элемента Listbox планируется в label значение function GetPluginDesc:string;.

Как это организовать?

[GunSmoker]

function GetPluginName:string;

String - тип Delphi. Никаких String в интерфейсе ядро-плагин быть не должно.

Как прикрепить его к программе?

uses MyPluginInterface.

при создании главной формы планируется загружать плагины.

Берёшь и загружаешь. LoadLibrary.

Значение возвращенные function GetPluginName:string;заносится именем в listBox

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

[Человек_Борща]

Сообщение от GunSmoker

String - тип Delphi. Никаких String в интерфейсе ядро-плагин быть не должно.

Что предлогаете использовать?

Сообщение от GunSmoker

uses MyPluginInterface.

Подключил. Далее сделал так:

unit MainFormUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,MyPluginInterface;

type
  TForm1 = class(TForm,ImyPlugin)
    ListBox1: TListBox;
    Button1: TButton;
    Button2: TButton;
    Label1: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
    function GetPluginName:string;
    function GetPluginDesc:string;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

function TForm1.GetPluginDesc: string;
begin
//??? что тут делать? 
end;

function TForm1.GetPluginName: string;
begin
//??? что тут делать? 
end;

Сообщение от GunSmoker

Берёшь и загружаешь. LoadLibrary.

это я знаю.

Сообщение от GunSmoker

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

Хорошо. Допустим есть такое:

type
  ImyPlugin = interface['{D9DCFB5E-3482-443E-8B91-A4EBE83C7DB7}']
  function GetPluginInterface:string;
  function GetPluginName:string;
  function GetPluginDesc:string;
  end;

Что делать основному приложению с полученным интерфейсом?

[GunSmoker]

Сообщение от Человек_Борща

Что предлогаете использовать?

WideString. В системе это BSTR.

//??? что тут делать?

А что ты собрался там делать? Плагинов у тебя может быть много. Кого из них дёргать будешь?

это я знаю.

Ну так и начни с этого. Так и понятно станет, что дальше делать. А то сейчас ты с середины начал. Конечно, так может быть непонятно, ведь у тебя на руках нет информации.

Хорошо. Допустим есть такое:

Ты чего-то вообще странное написал.

Ты статьи читал/примеры смотрел?

[Человек_Борща]

Написал кое-как проект. НЕмогу понять почему ошибки в конструкторах и деструкторах. Помогите найти причину багов и поставьте меня на путь истенный=)

Заранее благодарен!

[GunSmoker]

http://dl.dropbox.com/u/201788/Proje...luginsDemo.rar

В проекте плагина добавь ".." (без кавычек) в Search Path.

[Человек_Борща]

Интересная реализация много нового для себя открыл.
Как реализовать механизм общения плагин-интерфейс <> сервер-интерфейс?
Как это должно выглядеть(Не кодом).

Есть идея с сендмессаждами но какой тип данных там будет нужен?

[GunSmoker]

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

Конечно же, не нужно пихать ВСЁ в один интерфейс. Сам IHLRCore должен реализовывать лишь базовые вещи - вроде возврата версии ядра, списка плигинов и т.п.

Если надо, к примеру, дать плагинам доступ к главному меню программы, то это должен быть новый интерфейс IHLRMenu. Который, кстати, должен реализовываться главной формой, а в менеджер плагинов ты его передашь при создании формы (FormCreate) и снимешь после выгрузки плагинов (FormDestroy).

И так далее.

Есть идея с сендмессаждами но какой тип данных там будет нужен?

Можно и на сообщениях делать, но... зачем?

Из обмена сообщениями следуют:
1. Проблема упаковки параметров запроса и распаковки результата.
2. Неудобно проверять на ошибки.