Delphi 24点游戏实例代码,这是个图片版的24点游戏源码。读取第一个运算符的位置以得到表达式的第一个数字 function AnyFirstPos(Str: string): Integer; //读取最后一个运算符的位置以得到表达式的最后一个数字 function AnyLastPos(Str: string): Integer; //判断最先出现的符号是 号、-号、*号还是/号 function AnyFirstF(Str:String):Char; //此计算用于计算不带()号的加、减、乘、除运算 function
