如何将表达式返回 bool值 比如 我在edit 中输入 1 〉2 那么 有什么快速方法能计算出这个值是布尔类型的? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 uses ComObj ;{$R *.dfm}function Eval(expStr: string): string;varjs: OleVariant;beginjs := CreateOleObject('ScriptControl');js.Language := 'JavaScript';Result := js.Eval(expStr);js := Unassigned;end;Eval(edit1.text)就是你要的值,True是0,False是-1,怎么转不会说你不会吧。 http://community.csdn.net/Expert/topic/4101/4101460.xml?temp=.6220819 不知道了,大概就xinck的行了吧 把edit.text取出来,分解,判断出运算符,直接比较,就是bool型了啊 VCLSkin在DLL Form中的问题 请各位高手帮忙一下:如何把内存中的数据流保存成文件! BusSkinForm问题! 急救,在delphi中如何判断打印机是否安装。 一个英文下乱码的怪问题 delphi 的优越性在哪方面体现的最好? 请问怎么样才能够使得updown控件每次增加或减少0.1?? 高分儿!一个小问题!(在线,解决给分儿!) 如何在delphi中画像vb的line控件那样的线? delphi比vb好在哪里? 两个SQL哪个快 程序中使用的类似XP风格(alpha,带阴影)的图标怎么样才能去掉难看的白边?
{$R *.dfm}
function Eval(expStr: string): string;
var
js: OleVariant;
begin
js := CreateOleObject('ScriptControl');
js.Language := 'JavaScript';
Result := js.Eval(expStr);
js := Unassigned;
end;Eval(edit1.text)就是你要的值,True是0,False是-1,怎么转不会说你不会吧。