Программа и MathCAD

[Скарам]

пишу программы на С++,часто возникает ситуации,когда изначально в программу нельзя забить формулу(ну для примера: Реализовывал метод Свенна,ничего сложного,но необходимо заранее забить функцию,например y=sin(x),x!=0;y=1,x==0...) Хочется связать MathCad с программой,чтобы пользователь вводил формулу в Маткаде,потом программа посылала значение х в Маткад,Маткад вернул значение у..Как мне это сделать?.. Возможность такая должна быть... Парсить формулы бессмысленно,да и парсер не проще прикрутить,чем маткад..

[Vago]

Поищи вот эту книгу (или какое-то из её более ранних изданий, посвящённых более старым (13,...8,..) версиям; там только цифры в названии менялись). Ну и в документации наверняка должно быть (в MATLAB'е отдельный документ mixed-language-программированию посвящён).

Ну и, может, всё-таки, идею парсера
http://www.codeproject.com/KB/recipe...athParser.aspx
http://www.codeproject.com/KB/recipe...athParser.aspx
пока не отбрасывать?...

[Скарам]

Ну насчет парсеров я думал и не раз,но вот какая штука,на мой взгляд это занятие муторное и неблагодарное,особенно когда вся документация на английском языке(всю жизнь учил испанский,да и тот хромает). Да и если будет дана система уравнений,то еще необходимо будет писать и свой парсер,чтобы проверять условия...Конечно,если бы я выложил исходники и мне кто-нибудь помог вставить туда парсер(чтобы у меня был образец),тогда все кажется проще.Но это же никто не сделает,правильно?).. Поэтому налажу связь программы и маткада и вместо того,чтобы вызывать функцию double f(double x),буду передавать х в маткад...Выглядит более реально..))

[raxp]

...оно конечно на delphi... но важен сам принцип, через ole.

[Скарам]

Хмм...пока не понятно...вот она запустила Маткад

 ShellExecute(Application.Handle,'open','mathcad.exe',nil,nil,SW_HIDE);

Энто можно сделать через CreateProcessA..далее..нашла окно..вот и суть,да?

OLEContainer:=TOLEContainer.Create(Application);
    OLEContainer.Parent:=Panel1;
    OLEContainer.CreateObjectFromFile(ExtractFilePath(Application.ExeName)+mcdFileName,false);
    OLEContainer.DoVerb(OVPrimary);
    mcdDoc:=OLEContainer.OleObject;
    mcdDoc.ReCalculate;
    mcdDoc.GetComplex('Z1',I0,EmptyParam);

    mcdDoc.GetComplex('data1',data1,EmptyParam);
    mcdDoc.GetComplex('data2',data2,EmptyParam);
    mcdDoc.GetComplex('data3',data3,EmptyParam);
    mcdDoc.GetComplex('data4',data4,EmptyParam);
    mcdDoc.GetComplex('data5',data5,EmptyParam);
    mcdDoc.GetComplex('data6',data6,EmptyParam);
    mcdDoc.GetComplex('data7',data7,EmptyParam);

    mcdDoc.GetComplex('data0',data0,EmptyParam);
    OLEContainer.Close;

Не очень ясно пока,надо почитать...рыскал по гуглу встретил вот это.Умные люди,нид бэкап,я не тупой,я только учусь))..Где же найти описательную часть,мануал или алгоритм запроса-ответа...
З.Ы.С OLE вроде все понятно,но в примере,который я нашел подключали #include <Mathcad_TLB.h>,надо ли её подключать,или просто создать контейнер и все...Контейнер же делает доступными все функции типа "SetComplex"?..

[raxp]

...думаю для начала попробовать импортировать интерфейсы либы mathcad.dll... по-поводу мануала с api самому интересно.

[Скарам]

Смог добавить в проект

#include "Mathcad_OCX.h"
#include "Mathcad_TLB.h"

Описываю как делал,создал проект(использую Borland Developer Studio 2006).Зашел в Component->Import Component->Import a type Library->Mathcad Automation 1.0 Type Library (Version 1.0) и Mathcad Automation API (Version 1.0),добавил в проект.В основном юнете подключил все новые юниты(через use unit)..
Но дальше что делать не понятно,здесь написано,что можно создать,например,объект IMathcadWorksheet,но когда пишешь

IMathcadWorksheet w;

Он говорит синтаксическая ошибка. Может я опять фигню сделал?..
З.Ы.Ввот пример: Создаю IMathcad McdDoc;,пишет

[C++ Error] Unit4.cpp(18): E2352 Cannot create instance of abstract class 'IMathcad'
[C++ Error] Unit4.cpp(18): E2353 Class 'IMathcad' is abstract because of '__stdcall IMathcad::Recalculate(long *) = 0'

[raxp]

...попробуйте через тип variant

 variant w, ww;
 olevariant re, im;

 w = CreateOleObject("mathcad.auto");
 w.Open("1.mcd"); // должон быть в наличии
 ww:= w.ActiveDocument;
 ww.GetComplex("in0", re, im);

 re = 100;
 im = 0;
 ww.SetComplex("in0", re, im);
 ww.Recalculate;

...еще, у мя версия mcad2000

[netrino]

Сообщение от Скарам

IMathcadWorksheet w;

Он говорит синтаксическая ошибка. Может я опять фигню сделал?..
З.Ы.Ввот пример: Создаю IMathcad McdDoc;,пишет

Нельзя создавать объекты абстрактных классов, только указатели

IMathcadWorksheet* w;

[Скарам]

To raxp,у типа variant нет метода open,я пробовал похожие варанты-и через OleFunction,OleProcedure и так можно продолжать очень долго,обычно вываливается ошибка на стадии выполнения программы с сообщением Неизвестное имя функции или такое действие не поддерживается..
To netrino,теперь создается,даже стали доступны методы класса GetValue и прочие..теперь осталось разобраться как от OleContainer1->CreateObjectFromFile( "c:\\funcion.xmcd", False ); перейти к этому классу.Здесь есть пример на делфи,в котором они от объекта переходят к MC.Worksheets...Какой аналог у Worksheets в С++?Просмотрел все,что предлагает OleContainer1-> и OleContainer1->OleObject, там такой строки нет(...В принципе после этого перехода думаю,что все проблемы решаться...(