VFP编写DLL

阿杰

有两种 DLL 文件，一种是用 Declare 声明然后调用，这种文件 Copy 了就能用，但不能用智能提示，只能用专门的工具查看里面有什么东西，这种 Dll 一般是用 C 编写的。

另外一种是 COM 方式的 Dll ,用 Createobjectex() 或 Createobject() 调用，对象名的两部分组成，也不能直接看出，需要开发者提供，下面就可以用智能提示了。文件要注册（regsvr32），这种 Dll 许多语言都可以开发，也都可以调用，VFP 开发的 Dll 就属于这种。
能调用 COM 组件的开发工具都可以使用这种 Dll

1. 
   
2. Local loCom
   
3. loCom = Createobject('Mydll.Mydata')
   
4. 
   
5. *!* 示例：
   
6. 首先建一个工程，如MyDll，
   
7. 然后建一个主程序，如MyDllMain，
   
8. 然后在这个主程序里写如下代码：
   
9. **********取得表中记录总数**********
   
10. Define Class MyData As Session OlePublic&&如果是VFP6-SP5以下，把SessionN改为Custom
    
11.     Procedure GetDataCount
    
12.         Lparameters tcTable
    
13.         Select 0
    
14.         Select Count(*) From (tcTable) Into Array curData
    
15.         Use In (tcTable)
    
16.         Return Alltrim(Str(curdata))
    
17.     Endproc
    
18. Enddefine
    
19. ************************************
    
20. 编译时选择连编成DLL。
    
21. 
    
22. 在VFP中调用这个DLL：
    
23. Local loCom
    
24. loCom = Createobject('Mydll.Mydata')
    
25. ?loCom.GetDataCount('temp1') &&temp1为表名
    
26. Release loCom
    
27. loCom = Null
    
28. Return
    
29. 
    

复制代码

注：
1.session只能在VFP6.0+SP5开始才能使用，建议使用7.0或更高版本。若非要用6.0,则必须打补丁，或改用CUSTOM类。
2.编译成的DLL，与EXE一样，要用运行库，还必须同时发布 VFP[x]T.Dll文件（[x]可为6、7、8或9）。
3.如果感觉用DLL不方便，那么可以编译成用vfp的exe文件,直接在其他开发工具中调用执行,只要定义数据接口就行。如：其他开发工具调用vfp的exe程序,vfp程序把结果输出到一个txt文件中,然后再由其他开发工具进行读取即可。

文章来源：http://blog.csdn.net/apple_8180/article/details/2318555

周青涛

vfp好像彻底凉了吧，现在来看过得真快啊