Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

MathCAD

6.0K
08 декабря 2008 года
Tramp
71 / / 25.07.2006
Всем Привет!
Нужен совет, как перенести код написанный на Delphi в Builder
Код:
uses
  OLEctrls, ComObj,
  Mathcad_TLB, OleCtnrs;

var

  Mcd : IAuto;
  McdDoc : IMathcad;
  Mc,MDoc: variant;

procedure TForm1.Button1Click(Sender: TObject);
begin

 Mc:=CreateOleObject('mathcad.auto');
 Mc.Open(GetCurrentDir+'\part1.mcd');
 MDoc:=Mc.ActiveDocument;

end;

procedure TForm1.Button3Click(Sender: TObject);
var M1r,M1i : OleVariant;
begin

   MDoc.GetComplex('in0',M1r,M1i);
   M1r:=67;   M1i:=0;
   MDoc.SetComplex('in0',M1r,M1i);
   MDoc.Recalculate;

end;
246
08 декабря 2008 года
GIZMO
1.8K / / 30.07.2004
Цитата: Tramp
Всем Привет!
Нужен совет, как перенести код написанный на Delphi в Builder


Совет - посмотри как работают с Вордом и Екселем например Тут и сделай аналогично.

 
Код:
Variant Mc = CreateOleObject("mathcad.auto");
Mc.OleProcedure("Open", "путь к файлу");
...
69K
11 февраля 2011 года
sasha115667
1 / / 11.02.2011
1. Составить программу для табулирования функции y(x)=2^cos(x)+x, x=(-"пи","пи") с шагом "дельта х=0,2*"пи" используя оператор for.
2. Составить программу для расчета длины кривой, заданной функцией
y(x)=2^cos(x)+x, x=(-"пи","пи")
3. Аппроксимировать экспериментальные данные, представленные массивом , функцией y(x)=2^cos(x)+x



^ - возведение в степень.

пи - это латинская пи 3.14..........
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог