【搞定】如何导入dll函数库？按手册导入不成功。**

dragonsoft

附件是delphi中调用dll的代码以及2个dll

我的studio版本：2809

按照“如何在Business 3中引入外部控件.pdf”中导入dll函数库的方法导入不行，麻烦看看如何才能正确导入？ 谢谢

jiahaiminghr

重新封装一下就可以。
我是在2809上做的。

dragonsoft

谢谢 可以导入了，但能说明下怎么用dll里的函数吗？

我这样写不行，手册里的是C#的也不适用。
var  DllHandle: THandle;
DllHandle := LoadLibrary(Pchar('smdll.dll'));


还有里面的函数原型是：
    TApiReceiveMO = function  (pMoBODY: pMO_BODY;
                               const retSize: integer
                               ): integer; stdcall;

pMO_BODY 这个是指针类型(pRPT_BODY = ^TRPT_BODY;) 可以直接使用吗？

jiahaiminghr

1、不用这样写
直接创建TIMAPI对象，调用它的方法去收发短信就可以了

2、平台不支持指针
你可以改造一下x3.rar中的封装单元
修改TImApi.ApiReceiveMO方法，传入的参数改为record，在方法的实现部分调用dll函数时，再传指针

jiahaiminghr

修改过的例子：

dragonsoft

1. 还是不行
var a:TIMAPI ;
a:=TIMAPI.create();

编译错误：
[´íÎó]Biz:\DDB\CSY\ZYJ1.Library.pas(20, 7): Undeclared identifier "TIMAPI"
[´íÎó]Biz:\DDB\CSY\ZYJ1.Library.pas(22, 3): Undeclared identifier "a"

需要引入什么吗？ 我在工具-选项里引入了 smdll.dll了

jiahaiminghr

uses
  SMDLL ;

dragonsoft

谢谢，可以用函数了。
最后再问个：
2、平台不支持指针
你可以改造一下x3.rar中的封装单元
修改TImApi.ApiReceiveMO方法，传入的参数改为record，在方法的实现部分调用dll函数时，再传指针

＝＝是不是只要在D6+sp2里就可以生成dll了，不用再用平台的Importer来生成dll了？

lixy

不行，平台的dll是为了平台和您的自定义组件交互用的。

dragonsoft

谢谢
那麻烦先结帖吧。
因为现在还不用到指针的函数，如果到时要用再重新导入好了。
到时有问题的话再麻烦