DELPHI调用MATLAB
matlab吧
全部回复
仅看楼主
level 1
GentleUncle 楼主
最近在搞这一块...看了不少论文
但是很奇怪一点,论文上的程序,在我的电脑上运行都报错~~
比如简单的让MATLAB计算然后把结果返回DELPHI:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, ComObj, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
Matlab:Variant;
zr,zi:OleVariant;
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;
begin
Matlab:=CreateOleObject('Matlab.Application');
zr:=VarArrayCreate([1,16,1,16],varDouble);
zi:=VarArrayCreate([0,0],varDouble);
for i:=1 to 16 do
for j:= 1 to 16 do
zr[i,j]:=Random;
Matlab.PutFullMatrix('a','base',VarArrayRef(zr),VarArrayRef(zi));
Matlab.Execute('contour(a)');
end;
end.
运行之后无错误~~
但是只要运行exe文件,点击按钮,就出现错误“EoleException with message"发生意外"”
求解
2011年10月25日 06点10分 1
1