的根。int PASCAL WinMain (HANDLE hInstance,
HANDLE hPrevInstance,
LPSTR lpszCmdLine,
int nCmdShow)
{
Engine *ep;
mxArray *P=NULL,*r=NULL;
char buffer[301];
double poly[4]={1,0,-2,5}; /* 三次多项式的系数 */
/* 启动本机 MATLAB教程： 引擎，如果出错则退出程序。
如想启动远程主机上的 MATLAB教程： ，则用相应主机名代替 /0*/
if (!(ep=engOpen("/0"))) {
fprintf(stderr,"/nCan't start MATLAB教程： engine/n");
return EX99v_FAILURE;}
/* 创建变量 P ，将 poly 变量中定义的多项式系数值拷贝至该变量 P*/
P=mxCreateDoubleMatrix(1,4,mxREAL);
/* 给变量 P 取名为 p ，将 P 传递到引擎空间， p 将被运用于 MATLAB教程： 表达式中 */
mxSetName(P,"p");
memcpy((char *)mxGetPr(P),(char *)poly,4*sizeof(double));
engPutArray(ep,P);
/* 利用 MATLAB教程： 求解多项式根，并写至缓冲区 */
engOutputBuffer(ep,buffer,300);
engEvalString(ep,"r=roots(p)");
/* 将缓冲区中的内容输出屏幕窗口，关闭 MATLAB教程： 引擎，释放指针 P 。 */
MessageBox(NULL,buffer,"Engexam.c-- 多项式 x^3-2x+5 的根 ",MB_OK);
engClose(ep);
mxDestroyArray(P);
return EX99v_SUCCESS;
}
（2）编译连接源程序
mex -f h:/matlab53/bin/bccengmatopts.bat engexam.c
（3）运行 engexam.exe
图 12.7.3 -1 运行程序 engexam.exe 得到的信息窗口
上一篇： Matlab 面向对象编程
下一篇：Matlab 控制流
