Вычисление функций в диалоговом режиме

@irma · Регистрация: 12.06.2009

Author24 — интернет-сервис помощи студентам

Здравствуйте! Возможно ли такое ввести какую-ту функцию например:3*x+ Math.exp(x)+1.5*sin(x) через textBox и вичеслить его пределах каких-то границ, тоже с textBox (последнее понятно)
заранее благодарью

@ArtOfLife · 23.03.2011, 21:15

Можно каким-нибудь извращенным образом парсить строку, если синтаксис входных функций очень схож, да и условий немного. А если делать все по-умному, то тогда вам необходимо смотреть в строну рефлексии, а именно - динамически создаваемого кода, но затраченное время не стоит такой задачи. Как вариант, можете в принципе сделать некий визуальный шаблон для вашей формы: для числовых значений - текст боксы, а функции будут выбираться из списка. Как-то так, но все это для извращенцев. Повторюсь, данная задача не стоит таких выкрутасов.

@mss · 23.03.2011, 22:10

Запросто.
На то в любой современной мелкомягкой ОС есть штатный СOM-сервер под названием MS Script Control

@irma · 23.03.2011, 22:19 **[ТС]**

если вам не трудно пожалуйста покажите пример

@afiskon · 24.03.2011, 13:46

Я в свое время для таких целей свой небольшой интерпретатор написал. Там всего строк 50 кода, можно в класс забабахать, чтобы один раз только писать. Погуглите про "Обратную польскую запись".

@sigmov · 24.03.2011, 15:57

Сообщение от irma

Здравствуйте! Возможно ли такое ввести какую-ту функцию например:3*x+ Math.exp(x)+1.5*sin(x) через textBox и вичеслить его пределах каких-то границ, тоже с textBox (последнее понятно) заранее благодарью

Вот сдесь 1я версия интерпретатора:
Leleko.CalcScript

Здесь интерпретатор с кэшированием:
Leleko.DynamicCalc

Компиляро средствами CSharpCodeProvider:
MathCompiler

@mss · 24.03.2011, 17:12

var sc: Variant;
..
sc := CreateOleObject('MSScriptControl.ScriptControl');
sc.Language := 'JScript';
ShowMessage(sc.Eval('var x = 2; 3*x + Math.exp(x) + 1.5* Math.sin(x)'));

p.s.
Какой @@@@@ перенес тему в СиШарп, если ТС вполне осмысленно открыл ее в Delphi - уму не постижимо)

@irma 0 / 0 / 1 Регистрация: 12.06.2009 Сообщений: 60
		1
	Вычисление функций в диалоговом режиме 23.03.2011, 18:43. Показов 1029. Ответов 6 Метки нет (Все метки) Здравствуйте! Возможно ли такое ввести какую-ту функцию например:3x+ Math.exp(x)+1.5sin(x) через textBox и вичеслить его пределах каких-то границ, тоже с textBox (последнее понятно) заранее благодарью 0

@ArtOfLife 145 / 145 / 26 Регистрация: 09.10.2009 Сообщений: 261
	23.03.2011, 21:15	2
	Можно каким-нибудь извращенным образом парсить строку, если синтаксис входных функций очень схож, да и условий немного. А если делать все по-умному, то тогда вам необходимо смотреть в строну рефлексии, а именно - динамически создаваемого кода, но затраченное время не стоит такой задачи. Как вариант, можете в принципе сделать некий визуальный шаблон для вашей формы: для числовых значений - текст боксы, а функции будут выбираться из списка. Как-то так, но все это для извращенцев. Повторюсь, данная задача не стоит таких выкрутасов. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	23.03.2011, 22:10	3
	Запросто. На то в любой современной мелкомягкой ОС есть штатный СOM-сервер под названием MS Script Control 0

@irma 0 / 0 / 1 Регистрация: 12.06.2009 Сообщений: 60
	23.03.2011, 22:19 [ТС]	4
	если вам не трудно пожалуйста покажите пример 0

@afiskon 65 / 53 / 4 Регистрация: 06.09.2010 Сообщений: 254
	24.03.2011, 13:46	5
	Я в свое время для таких целей свой небольшой интерпретатор написал. Там всего строк 50 кода, можно в класс забабахать, чтобы один раз только писать. Погуглите про "Обратную польскую запись". 1

@sigmov 584 / 371 / 63 Регистрация: 22.07.2009 Сообщений: 875 Записей в блоге: 4
	24.03.2011, 15:57	6
	Сообщение от irma Здравствуйте! Возможно ли такое ввести какую-ту функцию например:3x+ Math.exp(x)+1.5sin(x) через textBox и вичеслить его пределах каких-то границ, тоже с textBox (последнее понятно) заранее благодарью Вот сдесь 1я версия интерпретатора: Leleko.CalcScript Здесь интерпретатор с кэшированием: Leleko.DynamicCalc Компиляро средствами CSharpCodeProvider: MathCompiler 1

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	24.03.2011, 17:12	7
	var sc: Variant; .. sc := CreateOleObject('MSScriptControl.ScriptControl'); sc.Language := 'JScript'; ShowMessage(sc.Eval('var x = 2; 3x + Math.exp(x) + 1.5 Math.sin(x)')); p.s. Какой @@@@@ перенес тему в СиШарп, если ТС вполне осмысленно открыл ее в Delphi - уму не постижимо) 0