VFP9编写DLL动态库

来源：互联网发布：淘宝一款爆款的周期编辑：程序博客网时间：2024/05/16 18:24

VF编写DLL动态库我想一般软件都会有一大堆的自定义函数或过程，我一般都会把它封装成DLL文件，这样感觉比较专业一点吧！如何在VFP中设计DLL文件呢？

新建一个mydll.prg文件，写入下列代码：
*此功能为将4．30（4点30分钟）转为分为单位的函数和过程
DEFINE CLASS mydll as Custom OLEPUBLIC
PROCEDURE htom
      LPARAMETERS time1
      minute1=INT(time1)*60+VAL(right(STR(time1,10,2),2))
      RETURN minute1
ENDPROC
ENDDEFINE

或者
DEFINE CLASS mydll as Custom OLEPUBLIC
function htom
     LPARAMETERS time1
     minute1=INT(time1)*60+VAL(right(STR(time1,10,2),2))
     RETURN minute1
ENDFUNC
ENDDEFINE
然后新建一个项目，把这个mydll.prg设置成主文件，连编成mydll.dll文件就可以了。
或者新建一个custom类，把类设成主文件，在项目管理器击右健，项目信息，“server”输入项目名称，编译OK

完了之后，在“运行”注册regsvr32 d:/mydll.dll ，然后就可以在VF里调用啦
例：
mydll=createobject(“mydll.dll”)
？mydll.htom(3.30)

编好的DLL听说还可以供其它开发工具调用哦，没试过！

其实，dll文件是通用的，不过需要有个版本信息，否则不可以使用，如VB.net编写的Dll，需要加强名称处理一下，Delphi就可以调它。