生成“接口包文件”.bpl
在Delphi中,在原来的包文件.dpk中增加步骤二生成的_tlb.pas文件
我的_tlb.pas不是通过选择“Component | Import ActiveX Control”,“Add”控件文件(.dll或.ocx文件),“Create Unit”生成类型声明文件_TLB.pas写的,而是直接新建一个单元文件写的,代码如下
unit RBSPAdapter;
interface
uses
SysUtils, Variants, Classes,Controls,
Dialogs, StdCtrls,ActiveX;
implementation
procedure __free(l :TList ); stdcall; external 'RBSPAdapter.dll'name '__free';
function QueryCustom(const service,queryCondition: PChar; var success: boolean): TList; stdcall; external 'RBSPAdapter.dll' name 'QueryCustom';
end.
这样打包起来生成的BPL应该不会有问题吧 |