在Visual FoxPro中访问动态链接库DLL.docVIP

在Visual FoxPro中访问动态链接库DLL 3 黼州Vf癞镰编程指导 ◆河南开封李i伟-f, VisualFaxPro(简称vFP)尽管功能十分强大,但 在完成诸如多媒体播放,读写系统注册表,管理内存 等任务时也会感到困难,而~INDOWS的动态链接库 (DLL)则在这些方面具备很强的功能.因此VYP提供 了调用它的机制,扩展自身的功能. 动态链接库是一个由若干函数组成的可执行模 块,其中包括扩展名为.DLL,.DRV,.EXE和FON 的所有~INDOWS系统文件.vFP调用其中的函数可 完成很多功髓,具体方法有下两种: 1}1月自披re出()和callfn()调用 在FcaProforWindows2.5～26或VisualFoxPro 3.0—5.0中,调用DLL函数之前首先要用setlibrary. tos(2OO4)+foxtools.SVaddifive命令将FoxPro的动 态链接库foxtoolsdll调人内存;然后用函数re加()或 ~fn32()登记DLL函数;最后用callfn()调用已登记 的DLL函数. 该方法既可调用16位的Dl_Il函数,又可调用 32位的DLL函数,但在VFP中用起来不是很方便, 故不再详述 2.用DECLARE令调月 DECLARE是VFP专门用于声明外部Windows32 位动态链接库(DLL)函数的命令.VFP在调用DLL函 数前,必须先用该命令声明函数名及其所需的参数 类型,然后才可以象使用VFP的内部函数一样调用 WINDOWS的DLL函数.该命令格式为: DECLARE【cFu~ctionType]FunctionNameINLi— braryName[ASMiasName】【cParamTypeI【@】Param- Nan:e1.cParamType2[@]日mNaIT.e2.…] 其中各参数的作用说明如下: (1)cFuncfioaType 表示WindowsDl_Il函数返回值的类型.若无返回 值,则可以不带该参数.函数类型可取下列值: 类型说明类型说明 SHORT16位整数DOUBLE64位浮点数 LONG32住整数STPdNG字符$ SINGLE32住浮点数 (2)Functiotd%me 表示被声明的DLL函数名.注意:函数名区分大 小写. (3)INLibrmyName 指定外部动态链接库的名称,该库包含Func- tltmName指定的DLL函数.假如指定WIN32AP]为库 名,则V将在KERNEL32DLL,GDI32.DLL,US- ER32DLL,MPR.DLL和M)VAPI32DLL中查找被调 用的DLL函数. (4)ASAliasNarne 若DLL函数名与某个VFP函数重名或者不合法 时,使用该子句可为该函数起个别名,但别名不髓是 VFP保留字或另一个已登记的DLL函数名. 给函数起别名后,可以使用别名来调用该函数, 且不区分大小写. (5)[cParamType1[@]ParamNamel,cParamType2 【@】ParamName2.…】 该项中的ciSaramTypeI,cParamType2用于指定 DLL函数所需参数的类型其中包括: INIEGER32位整数SINGLE32位浮点数 DOUBLE64住浮点数STRING字符 若要按引用方式传递参数,必须在cParamType 之后加@,且在调用时的相应变量前也要加@= 参数名PammNan:eI,ParamNan:e2等是可选的.它 们可被作为函数接收的参数名和参数类型的提示. 若不想再调用DLL中的函数,可执行命令 CLEARDLLS或CLEARALL,从内存中清除所有 .f下特第33页) 且编辑,王亚梅● iflm(e(1)gt;0 amp;amp;保证持连字段名车为空字符串 n…uⅢ十I ifhum# =ains(mtar~t,tv) amp;amp;若光标不在选中字段名尾部,则插入谊字段名 endif n~get(tv)=rmotm~(sv) ★*特待选字段名州表中被选中项的后续字段名依 次前耪 js 1l】1 d0wheilt;=1 im~ree(i)=nmlI十I) i=i十I enddo 一(recc【I)一rLm十1J= e口出f showgels rmeie2amp;amp;选择【删除】按缸 ifl∞(mtBr剐(1v),gt;0 =alns(1mou~e.sv) m80l|r(w)=mm%-el(tv) ★★将选中卒段名列表中被选中项的后续字段名依 班前耱 …IⅢu dowhileilt;=J mtm~et(1)=nnarg{i+1) i=i+1 e Ima【(1IⅢ¨)= bum1 emil showb c雠rnseIe=3 日ekI l c