delphi下query控件使用的问题，请高手帮忙？

我的语句内容为 with query1 do begin databasename:=fpath; sql.Clear; sql.Add('select * from '''+fname+''' where (left(c_unitcode, 2) <> '''+edit2.Text+''')'); execsql; open; 其中fname是表名变量，可是编译以后报错错误信息为 invalid use of keyword Token: left(c_unitcode, line number:1,

不知道为什么错了，请高手帮忙？非常感谢！！！！