四、在Delphi中如何启动Matlab将前面步骤处理完后,我们可以用以下程序隐式启动Matlab。 copyfile('c:\dsm\matlabfile\Mymatlabrc.m','c:\matlab\toolbox\local\matlabrc.m',false);winexec('c:\matlab\bin\matlab.exe',SW_MINIMIZE); 五、Delphi如何接受Matlab输出结果 Matlab将计算结果通过save c:\matlabfile\matlaboutfile.dat m -ascii -double进行输出,所以我们可以通过下面程序获取计算结果,并将结果通过double类型变量mid放进数组a[i]中:(Fa为textfle类型变量) if FileExists('c:\matlabfile\matlaboutfile.dat') then AssignFile(Fa,'c:\matlabfile\matlaboutfile.dat'); Reset(Fa);i:=0; While not Eof(Fa) do begin read(Fa,mid); a[i]:=mid; i:=i+1; end; closefile(Fa); 另外,在应用上述步骤完成接口后,还需要在应用程序中添加以下代码,以还原Matlab原始环境参数设定: copyfile('c:\matlabfile\matlabrcbak.m','c:\matlab\toolbox\local\matlabrc.m',false); (责任编辑:泉水) |