网上找的, 没有作者信息, 只能在这里感谢一下了, 支持标准写法的四则运算 --2015-12-15 修改了一个内存泄漏的BUG - Pop方法没有释放申请的内存 unit Base.Calculate; interface uses System.SysUtils, System.Classes, System.Contnrs, System.Generics.Collections; type TTokenType = (tkNumber, tkAdd, tkSub, tkMul, tkDi…