كيفية الإتصال ببرنامج الماتلاب في دلفي

[علي]

السلام عليكم

أثناء تجولي في الشبكة العنكبوتيه وجدت موضوع أثار فضولي

ألا و هو طريقة الإتصال ببرنامج الماتلاب الغني عن التعريف و من لا يعرفه يمكنه الآن أن يعرفه

كود :

http://www.ask-pc.com/vbx/showthread.php?tid=7651

طريقة الإتصال:

1- نحتاج في بداية الأمر إضافة بعض المكتبات العامة في Delphi و التي ستسمح لنا بالإتصال ببرنامج الماتلاب و هذه المكتبات هي : ComCtrls, ComObj

كود :

uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, StdCtrls, Buttons, ExtCtrls, ComCtrls,ComObj;

2- باستخدام أزرار الأمر :

PHP كود :

procedure TForm1.BitBtn2Click(Sender: TObject);
var name:string;
begin
MatApp:=CreateOleObject('matlab.application');
MatApp.visible:=1;
end; 


3- و لارسال بعض الأومر نحتاج لإضافة السابق لكود زر الأمر:

PHP كود :

name:='MyFileNameWithNumericalData.txt';
MatApp.PutWorkspaceData('File_Arff','base', name); 


4- و أخيرا لاستدعاء البرنامج نحتاج التالي

PHP كود :

MatApp.Execute('A=load('File_Arff');');
MatApp.Execute('plot(A)'); 


ترجم بتصرف:

PHP كود :

By Corzo
    Civil Engineer ECI
Msc. Hydroinformatics
UNESCO-IHE
Delft(Holland)
Actually Research Fellow 


اتمنى لكم حسن الإستفادة

[kachwahed]

بداية موفقة أخي علي
شيء جديد وجميل، بالتوفيق للمزيد...

[علي]

شكرا لك أخي كاش واحد
و أنا أحب أن برنامج الماتلاب من البرامج الهندسية المثيرة للشغف الرياضي و الهندسي
و أنا لم أدرس الماتلاب بعد لأني سنة أولى و لكن على حسب وصفه أنه برنامج يحل المستحيل بالرياضيات