Eval for Delphi version 1.0-Eval version 1.0 for Delphi

熟悉matlab的人都会很清楚matlab中的feval()函数没法对匿名函数进行运算，当然更不可能执行当前路径之外或者说搜索路径之外的函数。还有eval只能执行字符串命令。 9 q2 u8 e" L& Y, E Z8 {然而evalf解决了上面的所有问题 -Matlab person familiar with the very clear matlab in feval () function can not be anonymous function of computing, of

function main() clc; clear all; f = @(x)log(x+sin(x)); % 测试函数 df = @(x)(1+cos(x))/(x+sin(x)); % 导数函数 x0 = 0.1; % 迭代初值 x = TestNewton(f, df, x0) % 牛顿法求解 function x = TestNewton(fname, dfname, x0, e, N) % 用途：Newton迭代法解非线性方程f(x)=0 % fname和df