Bpl 代码
---------------
unit uOplComn;interfaceuses
Windows, SysUtils, Classes, Forms, Controls, uFuncComn;
type
TskOplComn = class(TPersistent)
public
procedure OpenPartsInfoForm;
end;implementationresourcestring
sErrorCreateForm = '创建窗体失败!'#13#10'窗体名 %s ';{ TskOplPkg }procedure TskOplComn.OpenPartsInfoForm;
begin
LoadAddinPackage('TskBsIf', 'TskBsIf.bpl');
ShowModalFormByClassName('TfrmPartsInfo');
end;initialization
RegisterClass(TskOplComn);finalization
UnregisterClass(TskOplComn);end.----------------
在Exe中是动态调用的Bpl,请问,在EXE中如何调用 TskOplComn 的OpenPartsInfoForm 过程呢?
---------------
unit uOplComn;interfaceuses
Windows, SysUtils, Classes, Forms, Controls, uFuncComn;
type
TskOplComn = class(TPersistent)
public
procedure OpenPartsInfoForm;
end;implementationresourcestring
sErrorCreateForm = '创建窗体失败!'#13#10'窗体名 %s ';{ TskOplPkg }procedure TskOplComn.OpenPartsInfoForm;
begin
LoadAddinPackage('TskBsIf', 'TskBsIf.bpl');
ShowModalFormByClassName('TfrmPartsInfo');
end;initialization
RegisterClass(TskOplComn);finalization
UnregisterClass(TskOplComn);end.----------------
在Exe中是动态调用的Bpl,请问,在EXE中如何调用 TskOplComn 的OpenPartsInfoForm 过程呢?
解决方案 »
- sql语句保存stringgrid表数据
- treeview調用問題?
- 关于checklistbox的小问题
- 如何在quickrep中把某栏的数据进行加总?我的dbtext都已连接到数据库的
- 马年最后个问题:谁会用打印机自带字库进行打印?
- Button怎么更改颜色?
- outlook_style样式的控件(就好象qq那样的)是怎么写出来的?是panel上加Button做的吗?
- 打包的问题:我制作好了setup应用程序,运行setup,最后没有与我的delphi里的文件(工程文件)发生关系,安装完后,好象只有些制作时候默认
- combobox 问题 求大侠帮我改改
- 拿到一本机械工业出版社出版的老外写的 delphi com深入编程,不知有没有看过这本书的?
- hook (ws2_32.dll / send) 怎么修改封包后再发送???buf长度不变容易修改,长度变化了就不行了.
- 按钮问题
OpenPartsInfoForm定义为接口方法。
主程序取到该对象后,查询相应接口,若成功,则可以直接调用。
我也想过用接口,但不合适,因为这个bpl我想做为业务逻辑层,EXE只做为界面,不想在EXE写过多的代码