VC调用matlab中定义的.m文件中的函数的实例

Posted on 2012-02-26 14:55  无忧consume  阅读(304)  评论(0编辑  收藏  举报

http://www.cnitblog.com/edaiqingwa/archive/2006/12/18/20741.html  

  Matlab是一个强大的数学计算/仿真工具,其内置了很多实用的现成的函数,而且我们经常也自己定义很多m函数。但在很多情况下,我们不得不使用VC编程。那么,如何在VC中利用matlab的资源呢?在这里我简要的以一个简单的例子来说明一下如果在VC中调用matlab中定义的.m文件。繁多的理论就不说了,简明扼要的说一个实例。相信大家看过之后都会马上学会的J

            其中灰色底显示的部分是需要我们手工输入的部分。

            步骤如下:

            ㈠当然是先建立 matlab 的 m 文件。

  这里为了简单起见,我在matlab中定义了一个函数,其m文件如下:

  function y = add_zh(a,b)     

  y=a+b

  保存为myfunct.m

            ㈡下面来对 matlab 编译环境进行设置。 打开matlab,在命令行状态下键入:mex-setup

然后出现如下提示:

--------------------------------------------------------------------------------------

Select a compiler:

[1] Borland C++Builder version 5.0 in C:\Program Files\Borland

[2] Lcc C version 2.4 in F:\SOFT\SHARE\MATLAB65\sys\lcc

[3] Microsoft Visual C/C++ version 6.0 in C:\Program Files\Microsoft Visual Studio

[0] None

 

Compiler:

--------------------------------------------------------------------------------------

  这里我们选择’3’。(如果使用其他的编译器比如BCB,那么就可以相应的选择’1’)

  然后,继续在命令行状态下输入:

  mbuild –setup

--------------------------------------------------------------------------------------

Please choose your compiler for building standalone MATLAB applications: 

Would you like mbuild to locate installed compilers [y]/n? y

Select a compiler:

[1] Borland C++Builder version 5.0 in C:\Program Files\Borland

[2] Lcc C version 2.4 in F:\SOFT\SHARE\MATLAB65\sys\lcc

[3] Microsoft Visual C/C++ version 6.0 in C:\Program Files\Microsoft Visual Studio

[0] None

 

Compiler:

--------------------------------------------------------------------------------------

这里需要几步确认。大家按情况操作即可。

            ㈢对 VC 的编译器环境进行设置。 在Tools-options-directory里面设置include和lib的路径,分别添加一项,指向matlab安装目录中的\extern\include和 \extern\lib

            ㈣这一步比较关键。在这一步中,将 matlab 中的 .m 文件转换为 dll 。

在matlab命令行中输入:

mcc -t -h -L C -W lib:ppp -T link:lib myfunct.m

         至此,可以发现在myfunct.m所在的目录中产生了一大堆文件。我们只用其中3个:

            ppp.h    ppp.lib     ppp.dll

          ㈤新建一个 VC 工程 。这里取名为 mat 。为了简单,我们在这里建立一个对话框来进行演示。如下:

 

然后,将上面这3个文件拷贝到VC工程所在的目录中,以便VC调用之。

            ㈥进行 VC 编程。

首先,在cpp文件中加入:  #include “ppp.h”

然后,设置VC的链接库。在project-settings-link下的object/library modules中加入:

ppp.lib libmx.lib libmatlb.lib libmmfile.lib

至此,VC的编译环境设置完毕。下面就是编程部分了。

            ㈦编程部分的关键:接口和数据类型的转换

先给出 VC 实现的源代码:

------------------------------------------------------------------------

void CMatDlg::OnButton1()

{           // 在 matlab 中定义的 m 文件 :myfunct ,其功能是完成两个数的相加操作。

                CString str;

            UpdateData(true);

            pppInitialize();

            // 为了调用 matlab 中的函数,必须使用数组数据类型,并其后调用 matlab 函数将其转化为矩阵格式( matlab 的基本数据类型是矩阵)

            static double x1[1]={1.0};

            static double x2[1]={2.5};

            double result;

            // 调用 matlab 创建 3 个矩阵

            mxArray *A=mclGetUninitializedArray();

            mxArray *B=mclGetUninitializedArray();

            mxArray *C=mclGetUninitializedArray();

            // 将 C 语言中的变量值赋给 matlab 中的矩阵

            mlfAssign(&A,mlfDoubleMatrix(1,1,x1,NULL));

            mlfAssign(&B,mlfDoubleMatrix(1,1,x2,NULL));

             mlfAssign(&C,mlfMyfunct(A,B));

            // 将 matlab 中的矩阵的指针传递给 C 语言中的指向 double 的指针

            double * md=mxGetPr(C);

            result=md[0];

            // 释放这些矩阵

            mxDestroyArray(A);

            mxDestroyArray(B);

            mxDestroyArray(C);

            str.Format ("It is : %f",result);

            ::AfxMessageBox(str);

}

------------------------------------------------------------------------

相信看到里面的注释,我们就明白的差不多了。

VC 编程以实现对 matlab 函数的调用,例如 VC 中我们实现两个 double 型的相加,则需要做上述的编程:首先定义两个数组并存入我们要进行函数操作的数据(也就是所谓的实参);然后将这两个数组转换为 matlab 可以识别的矩阵;然后调用 m 文件中自定义的函数,对矩阵进行操作;最后将结果再转回 VC 支持的数据格式:

            double * md=mxGetPr(C);

            result=md[0];      

至此,经 matlab 函数处理过的数据已经存入了 VC 中的 result 变量。         

 

            mlfAssign(&C,mlfMyfunct(A,B));

大家可以看出来,在进行调用的时候,我们使用的是 m 文件的文件名 myfunct ,而不是 m 文件中定义的 add_zh(a,b)

Copyright © 2024 无忧consume
Powered by .NET 8.0 on Kubernetes