Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.03.2014, 10:15   #1
peter065
Пользователь
 
Регистрация: 09.09.2010
Сообщений: 30
Радость MathCad в Delphi

Здрасьте все. Подскажите, как можно прикрутить mathcad к delphi?
peter065 вне форума Ответить с цитированием
Старый 11.03.2014, 10:48   #2
cooper72
 
Регистрация: 10.03.2009
Сообщений: 3
По умолчанию

что вы имеете ввиду под словом "прикрутить?"
Совместить IDE Delphi и MathCad? так нельзя.
Может хотите использовать код из MathCad в Delphi или наоборот?
cooper72 вне форума Ответить с цитированием
Старый 02.04.2014, 17:05   #3
peter065
Пользователь
 
Регистрация: 09.09.2010
Сообщений: 30
По умолчанию Mathcad & Delphi

Как можно прикрутить маткад к делфи?
peter065 вне форума Ответить с цитированием
Старый 02.04.2014, 20:50   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Рекомендую начать изучение отсюда:
http://www.programmersforum.ru/showthread.php?t=85342
Это конечно на Билдере, но основные функции также как и в Делфи называются.
Т.е. создать обьект Mathcad.Application и уже обращаясь к его свойствам управлять им.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 29.05.2015, 08:00   #5
Alexandro87
Новичок
Джуниор
 
Регистрация: 27.06.2009
Сообщений: 1
Сообщение

с момента последнего сообщения прошёл уже год, но может, кому будет интересно...
Есть квадратная матрица GrandMatrix надо найти определители матрицы.
файл MathCAD содержит некие формулы и две переменных mtrin и detout
по уму, надо писать вычисление в блоке try Finally, чтоб в случае ошибки уничтожить variant-ы

Код:
var
  MathCadApp: variant; 
  MathCadWorksheet: variant;

  i, j, k: integer;
  GM: variant;
 
  res: double;
...
begin
  i:= Length(GrandMatrix);
  MathCadApp:= CreateOleObject('MathCad.Application');

  MathCadWorksheet:= aMathCadApp.Worksheets.Open( aMCDFilePath ); 
  MathCadApp.Visible:= true; //видимость при необходимости

  k:= High(GrandMatrix);
  GM:= VarArrayCreate([0, k, 0, k], varDouble);
  for i:= 0 to k do
    for j:= 0 To k do
      GM[i, j]:= GrandMatrix[i, j];

  MathCadWorksheet.SetValue('mtrin', GM);
  sleep(200); //надо чтоб маткад посчитал формулу, иначе получим ошибку
  res:= MathCadWorksheet.GetValue('detout').Real;
  GM:= UnAssigned;

  MathCadWorksheet.Close(mcDiscardChanges);
  MathCadApp.Quit(mcDiscardChanges);
  MathCadWorksheet:= UnAssigned;
  MathCadApp:= UnAssigned;
...
end;
Alexandro87 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Delphi+Autocad+MathCad serg_art Общие вопросы Delphi 4 26.02.2013 09:30
Delphi с использованием пакета Mathcad Arinnna Общие вопросы Delphi 0 27.05.2012 10:22
Mathcad NoviK# Помощь студентам 0 18.12.2011 08:57
MATHCAD HECTOR.A. Помощь студентам 3 08.03.2009 20:21
Осуществление функции Root из MathCad в Delphi NITRON Общие вопросы Delphi 0 17.08.2007 12:17