[开源项目-MyBean轻量级配置框架] 使用MyBean快速搭建分模块的应用程序(主页面的TAB)(DLL-MDI)

[概述]

     抱歉由于上次开源比较匆忙，没有来的及做一个DEMO，里面也有些垃圾的文件没有及时清理。DEMO其实昨天晚上已经调通。相关说明文档今天晚上才说明好，欢迎大家继续关注和交流，和大家一起分享我10多年的管理软件框架开发经验，后续会完善更多相应的有用的插件，供大家直接使用。

[DEMO图片预览]

[MDI-DEMO-BIN文件说明]

编译好的文件打包存放于根目录下面，文件名为:MDI-DEMO-BIN.zip,采用XE5编译，使用标准控件，其他版本编译myBeanConsole.exe和plugin-demo-form工程就好，记得这两个工程需要带包，beanMananger.dll可以通用。不需要编译。

myBeanConsole.exe
   --主控台EXE，包含主窗体(带包编译)

myBeanConsole.config.ini
   --配置文件，包含是否使用缓存目录，是否预加载DLL，等配置

demoBeans.plug-ins
   -- bean的配置文件，可以多个，有主配置文件指定目录(可以通配符)，参考主配置文件说明

beanManager.dll
   -- 框架核心DLL文件,由plug-ins-core\beanMananger提供，标志的Windows DLL文件，不需要带包编译，所有Delphi版本可以使用。

rtl190.bpl
vcl190.bpl
   --XE5 运行包文件(由于使用XE5编译的)

plug-ins\plugin_form_demo.dll
   -- DEMO DLL(带包编译)，注册了aboutForm插件和demoPluginForm插件

[主配置文件说明]

主配置文件文件名: EXE文件名+config.ini，或者app.config.ini

[main]
;加载时插件缓存(放入临时目录)
;true时copy到临时缓存目录进行加载, false插件目录进行加载
;默认为true值
plug-ins-cache=1

;插件临时目录，支持相对路径(EXE目录的相对路径)，绝对路径(c:\temp\
;默认为plug-ins-cache
plug-ins-cache-path=temp-files

;加载DLL在启动程序的时候
;默认为true
loadOnStartup=0

;加载bean配置文件目录(相对路径(EXE目录的相对路径)，绝对路径(c:\config\*.*)
;没有配置时,直接加载DLL,从DLL中获取PluginID
;<none>时不加载任何DLL插件
beanConfigFiles=*.plug-ins,plug-ins\*.plug-ins,beanConfig\*.plug-ins

;加载文件时记录日志；
;默认为false, 为true时可以从日志文件(log\loadDLL_trace.txt)便于查看到哪个文件加载失败
traceLoadLib=1

[bean配置文件说明]

配置文件可以单个也可以多个，存放路径由主配置文件指定

beanConfigFiles=*.plug-ins,plug-ins\*.plug-ins,beanConfig\*.plug-ins

上面配置指定了根目录的*.plug-ins文件和plug-ins目录下的*.plug-ins文件…

这样便于多人协作编写模块,文件采用JSON格式。

格式与说明

{
   list:
   [
      {
         "id":"frame-core",
         "pluginID":"frame-core",           //如果与id一致可以进行忽略(同一个插件可以配置成多种bean)
         "lib":"plug-ins\\plugin-demo-form.dll",        //文件名<插件存放的DLL文件>
         "singleton":true,                      //是否单件模式(比如远程数据访问插件,可以单件模式)
      }
   ]
}

[plugin-demo-form源码分析]

工程文件(提供了插件的注册，也可以写到窗体文件的initialize部分)

library plugin_form_demo;

uses
  SysUtils,
  Classes,
  uBeanFactory,
  ufrmAbout in '..\..\Forms\ufrmAbout.pas' {frmAbout},
  ufrmPluginForm in '..\..\Forms\ufrmPluginForm.pas' {frmPluginForm},
  uBasePluginForm in '..\..\Service\uBasePluginForm.pas';

{$R *.res}

begin
  beanFactory.RegisterBean('aboutForm', TfrmAbout);
  beanFactory.RegisterBean('demoPluginForm', TfrmPluginForm);
end.

ufrmPluginForm.pas，很简单新建一个vclForm，然后把TForm改成了TBasePluginForm(实现了IpluginForm的窗体类)

type
  TfrmPluginForm = class(TBasePluginForm)
    mmo1: TMemo;
    pnlOperator: TPanel;
    btnCreateAsModal: TButton;
    procedure btnCreateAsModalClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

[MyBean交流]

考虑了下，还是新建个群，方便讨论

群:205486036

源代码地址

https://git.oschina.net/ymofen/delphi-framework-MyBean