专注收集记录技术开发学习笔记、技术难点、解决方案
网站信息搜索 >> 请输入关键词:
您当前的位置: 首页 > VFP

VFP如何调用Dll

发布时间:2010-05-24 21:38:28 文章来源:www.iduyao.cn 采编人员:星星草
VFP怎么调用Dll
VFP8.0怎么调用COM组件形式存在的DLL文件,举个例子可以吗?比如有个ABC.DLL的文件,这个DLL里有个函数A(int iType) 怎么调用这个DLL里的A函数啊

------解决方案--------------------
新建一項目,然後新建一prg,把以下代碼寫入
DEFINE CLASS test_dll as custom OLEPUBLIC
get_para1 = ''
get_para2 = ''
FUNCTION init
LPARAMETERS p_para1,p_para2
this.get_para1 = p_para1
this.get_para2 = p_para2

PROCEDURE get_amt1
RETURN this.get_para2
ENDPROC 
PROCEDURE get_amt2
RETURN this.get_para1
ENDPROC 

ENDFUNC 
PROCEDURE get_inf
RETURN 'is get messagbox!'
ENDPROC 
ENDDEFINE
最後保存成test_dll (注意這個名字很重要)
然後選build中的單線程,編譯成test_dll.dll(名字可改)

調用 :
我是又新建一個項目測試的
o_custom = CREATEOBJECT('test_dll.test_dll')&&&第一個test_dll意義為dll名字,第二個test_dll為保存prg時起的名字
MESSAGEBOX(o_custom.get_inf(),48,'tip')
?o_custom.init('1','2')
?o_custom.get_para2
?o_custom.get_amt2()
友情提示:
信息收集于互联网,如果您发现错误或造成侵权,请及时通知本站更正或删除,具体联系方式见页面底部联系我们,谢谢。

其他相似内容:

热门推荐: