1.第一种方法的例子
FUNCTION GetFullMatrix (in Interface)
returnType : HResult
parameters:
name : BSTR [in]
worskace : BSTR [in]
pr : safeArray of double* [in,out]
pi : safeArray of double* [in,out]
FUNCTION PutFullMatrix (in Interface)
returnType : HResult
parameters:
name : BSTR [in]
worskace : BSTR [in]
pr : safeArray of double [in]
pi : safeArray of double [in]
var
FMatlab : Variant;
pr,pi : Variant
begin
FMatlab := createOleObject('Matlab.application');
FMatlab.execute('a=13;');
(safeArray)
pr := varArrayCreate([0,1],varDouble);
pi := varArrayCreate([0,1],varDouble);
// Error
FMatlab.putFullMatrix('myVariable','workspace',pr,pi);
...
end;
第二种方法:你可以参考下面一篇文章
http://hanlin.hbu.edu.cn/personal/zhengkun/wenzhang5.htm
matcom下载地址:
http://www.pris.net.cn/down2/Software.Asp?id=1909
另:现在也许有另一种的解决方法,就是使用python和delphi混合编程,利用python的matplotlib库来实现常规的matlab函数,这种方法也比较可行