请教将字符串解释成语句的问题
有如下语句：
var
A:string;
begin
A:='3+2>4';
if A then
showmessage('True');
end;
//想实现 if 3+2>4 then 这个判断语句应该怎么改写；

我目前想到的办法是这样的：
var
A:string;
ADOQuery1:TADOQuery;
begin
A:='3+2>4';
ADOQuery1.SQL.Text:='select '+A+' from Table1';
ADOQuery1.Open;
if ADOQuery1.Fields[0] then
showmessage('True');
end;

请问还有其它什么更简单的方法直接实现吗？
代码下载
http://pan.baidu.com/share/link?shareid=1423917293&uk=1342501272
[解决办法]
这需要一个解析公式的方法，可能需要支持乘法和除法，以及括号等等，相当有难度。