找到了dynamic校长的一个帖子:http://www.matlabsky.com/viewthr ... amp;extra=#pid58586
Matlab和Forcal混合编程应当没有任何问题。
利用C++设计Forcal扩展动态库是很方便的,因而通过Forcal扩展Matlab的功能也是非常方便的。
我的计算机上没有Matlab,盼望有人能给出Matlab和Forcal混合编程的代码。
在最初使用FcScript时,仅练习使用VBMForcal接口中的函数VBComModule、VBGetForHandle、VBCalFor及VBDeleteModule(或者CMForcal接口中的函数CComModule、CGetForHandle、CCalRFor及CDeleteModule)这几个函数即可。
以VBMForcal接口为例:
2.1.2 编译源程序:VBComModule(FcStr,nModule,hModule,err1,err2)
将源程序中的表达式编译为一个或多个模块。源程序中可以用#MODULE#和#END#定义一个子模块。即#MODULE#和#END#之间的表达式定义为一个子模块。在模块中,以~开头的表达式被编译为公有表达式,能被其他模块访问到,其余的表达式均被编译为私有表达式,其他模块无法访问。
FcStr:指向源程序的字符串。
nModule:返回多个模块的最小模块号。一般用不到该参数。返回值是长整数!
hModule:返回模块的句柄,用于执行该模块。返回值是长整数!
err1和err2:返回编译出错位置。返回值是长整数!
该函数返回编译代码,若为0表示编译通过。返回值是长整数!
2.1.12 获得Forcal中自定义函数的句柄:VBGetForHandle(ForType,ForName,NumPara)
ForType:表达式的类型。只能取1(标识整数表达式)、2(标识实数表达式)、3(标识复数表达式);如果名称包含模块命名空间访问符::(如:"A::Fun"),只能取-1(标识整数表达式)、-2(标识实数表达式)、-3(标识复数表达式)。必须是长整数!
ForName:自定义函数名,字符串形式。可以包含模块命名空间访问符::(如:"A::Fun")。
NumPara:返回函数的参数个数。当NumPara=-1时表示有0个自变量,当NumPara=0时表示有1个自变量,当NumPara=1时表示有2个自变量,依次类推。返回值是长整数!
该函数返回自定义函数的句柄,若为0表示函数不存在。返回值是长整数!
2.1.13 执行Forcal中的自定义函数并返回运算结果:VBCalFor(ForType,ForHandle,Para)
ForType:表达式的类型。只能取1(标识整数表达式)、2(标识实数表达式)、3(标识复数表达式,不过尚未启用)。必须是长整数!
ForHandle:由VBGetForHandle获得的自定义函数的句柄。必须是长整数!
Para:一维数组,存放自定义函数的参数。当ForType=1时数组为64位长整数类型,当ForType=2时数组为实数类型,当ForType=3时数组为复数类型。
该函数返回运算结果。运算结果的类型与数组Para的类型相同!
注意:一个函数若要用VBCalFor执行,在Forcal源代码中必须用HFor("函数名",函数类型)获取过该函数的句柄,此句柄与用函数VBGetForHandle获得的句柄相同。
2.1.4 删除模块:VBDeleteModule(hModule)
hModule:编译源程序时得到的模块的句柄。必须是长整数!