如何在Delphi中调用Matlab(ActiveX)?

转载 2004年07月05日 18:42:00

7).如何在Delphi中调用Matlab(ActiveX)?
:#FangQ(Qianqian.Fang@dartmouth.edu), 2002/6/22.BigGreen/MathTools#


        从这个地址下载例子:
        http://www.djpate.freeserve.co.uk/Matlab.htm

        还有一种方法是利用DelphiMEX,下载地址:
        http://Radio-BIP.qc.ca/DelphiMEX/DelphiMEX.html

        下面是把Alex Conradie的例子中选了一些主要的语句:

        var

         V : Variant;
         MReal : OleVariant;
         MImage : OleVariant;

        begin
         i,j : integer;

         MReal  := VarArrayCreate([0, 1, 0, 3], varDouble);
         MImage := VarArrayCreate([0,0,0,0], varDouble);

         V := CreateOLEObject('Matlab.Application');
         V.Execute('a=[1 2 3 4; 5 6 7 8]');
         V.GetFullMatrix('a','base',VarArrayRef(MReal),VararrayRef(MImage));
         for i := 0 to 1 do
          for j := 0 to 3 do
           Stringgrid1.Cells[j,i] := MReal[i,j];

         V.Execute('peaks');

         MReal  := VarArrayCreate([0, 1, 0, 3], varDouble);
         MImage := VarArrayCreate([0,0,0,0], varDouble);

         for i := 0 to 1 do
          for j := 0 to 3 do
           MReal[i,j] := i+4;

          V.PutFullmatrix('b','base',VarArrayRef(MReal),VararrayRef(MImage));

        end

 

发信人: hyphone (每天爱你多一些), 信区: MathTools      
标  题: Re: 请问在delphi中怎样调用matlab的Activex服务
发信站: BBS 水木清华站 (Sat Jun  1 13:34:48 2002)

//C++Builder中是这样:
Variant Matlab;
...
  Matlab=CreateOleObject("Matlab.Application");
  Matlab.Exec(Procedure("help"));
Matlab=Unassigned;
//Delphi中应该是这样
Matlab:Variant;
....
Matlab := CreateOleObject('Matlab.Application');
Matlab.Execute('help');
Matlab := Unassigned;

【 在 chengpp (ly) 的大作中提到: 】
: 我想在delphi编的应用程序中,
: 调用matlab的ActiveX的服务,
: 就是调用matlab的绘图功能
: 应该怎么做那?
: 请教各位高手

》》》》》》》》》》》》》》》》》

在Delphi中调用matlab的例子

var
        V : Variant;
        MReal : OleVariant;
        MImage : OleVariant;
begin
        i,j : integer;
        MReal := VarArrayCreate([0, 1, 0, 3], varDouble);
        MImage := VarArrayCreate([0,0,0,0], varDouble);
        V := CreateOLEObject('Matlab.Application');
        V.Execute('a=[1 2 3 4; 5 6 7 8]');
        V.GetFullMatrix('a','base',VarArrayRef(MReal),VararrayRef(MImage));
        for i := 0 to 1 do
        for j := 0 to 3 do
        Stringgrid1.Cells[j,i] := MReal[i,j];
        V.Execute('peaks');
        MReal := VarArrayCreate([0, 1, 0, 3], varDouble);
        MImage := VarArrayCreate([0,0,0,0], varDouble);
        for i := 0 to 1 do
        for j := 0 to 3 do
        MReal[i,j] := i+4;
        V.PutFullmatrix('b','base',VarArrayRef(MReal),VararrayRef(MImage));
end 



 

点评:这都不是我想象中最好的方法,最好的还是com

Delphi 如何使用 Matlab 的 .m文件?

步骤:   1、在 matlab 中,将 .m 文件编译成 .c 文件;   2、用 bcc32 编译 .c 文件,得到 obj 文件;   3、在 Delphi 中,调用 obj 文件;  步骤...
  • dbyoung
  • dbyoung
  • 2015年04月09日 14:49
  • 2495

如何在Delphi中调用Matlab(ActiveX)?

7).如何在Delphi中调用Matlab(ActiveX)?:#FangQ(Qianqian.Fang@dartmouth.edu), 2002/6/22.BigGreen/MathTools#  ...
  • yuanqingfei
  • yuanqingfei
  • 2004年07月05日 18:42
  • 1665

精通matlab7.0混合编程.

  • 2015年06月30日 09:21
  • 6.59MB
  • 下载

Delphi下的COM接口編程(ActiveX Library)

在較早的時候,我的博客里已經有關于COM編程的有關知識(http://hi.baidu.com/yueyun889/blog/item/53ad2c1208b6f950f919b8ee.html),不...
  • lailai186
  • lailai186
  • 2012年11月16日 14:18
  • 2995

delphi中ActiveX 和 Web

http://book.77169.com/data/web5302/20050228/20050228__3692503.htmlActiveX 和 Web在Windows 操作系统下,有一个重要的...
  • leixg
  • leixg
  • 2010年05月13日 16:42
  • 3734

MATLAB 混合编程

原文地址:http://www.cnblogs.com/xfzhang/archive/2010/12/20/1912214.html Matlab Compiler(编译器)或mcc的使用—...
  • xiaogugood
  • xiaogugood
  • 2013年10月29日 13:45
  • 1443

Delphi组件安装方法,控件安装方法全解--关键词:Delphi,第三方组件,安装,DCU,PAS,DPK,BPL,ActiveX控件

Delphi组件安装方法,控件安装方法全解--关键词:Delphi,第三方组件,安装,DCU,PAS,DPK,BPL,ActiveX控件 关键词:Delphi,第三方组件,安装,DCU,PA...
  • autumn20080101
  • autumn20080101
  • 2012年09月24日 10:00
  • 1013

delphi7 开发ActiveX的学习备忘

关于delphi7 ActiveX的学习备忘Author :5caidm ,2008-06-12 步骤: 1、先创建ActiveX工程文件; 2、注册ActiveX文件(ocx文件) ; 3、编写相应...
  • cai5
  • cai5
  • 2008年06月13日 15:01
  • 4444

在ActiveX控件中如何动态调用DLL函数

刚到公司不久,接到领导的下达的一个任务,就是把对POS机操作功能封装在ActiveX控件中,在IE中调用。这样就能实现在IE上直接对POS机进行操作。而我要封装的这个动态库,厂家只提供了一个单的动态库...
  • Augusdi
  • Augusdi
  • 2009年10月08日 16:38
  • 3481

如何在Borland Delphi2005中安装OCX、COM 类组件?

昨天一网友 在群里问如何在Borland Delphi2005中安装 OCX组件,并且说按照delphi2005中的引入功能 PAS文件也生成了 就是不能在 ActiveX面板中找到相关 组件;  经...
  • dingbaosheng
  • dingbaosheng
  • 2006年03月14日 09:26
  • 2298
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:如何在Delphi中调用Matlab(ActiveX)?
举报原因:
原因补充:

(最多只允许输入30个字)