Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

задать функцию в приложении delphi [D7, WinXP]


Flame ©   (2005-09-26 22:38:00) 

Пусть описан функциональный тип
 type Tf=function(x:real):real;
В переменной s:string записана строка определяющая выражение-функцию к примеру s:=’x*x+sin(x)+1’ Эта строка задаётся во время работы приложения пользователем, который не ограничен в сложности задания этой строки.
Вопрос: хотелось бы:
 var f:Tf { type Tf=function(x:real):real;}
 begin
…
 unknown_instrument(s,f);
После его работы f соответствует функция, как будто бы она была описана так
 function f(x:real):real;
 begin
   f:={s}x*x+sin(x)+1;
 end


злобная танька   (2005-09-27 10:21:00) [1]

там парсер хороший, довольно быстрый, но возведение в степень у него глючит. а вообще там кажется их два. я скачала тот что покруче


Leonid Troyanovsky   (2005-09-27 08:42:00) [2]


> kami ©   (26.09.05 22:44) [1]
> Нужно именно самому, или пойдет готовый компонент для распарсивания
> выражения ?


Тут нужен не токмо парсер, но и компилятор выражений.
Где-то в Королевстве Дельфи была статья про подобное.

--
Regards, LVT.


kami   (2005-09-26 22:44:00) [3]

Нужно именно самому, или пойдет готовый компонент для распарсивания выражения ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо