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()