求助！！关于Delphi中的判断问题

Question

我有一个涉及到关于库存和借出的问题：
我想在借出的时候进行判断库存是否足够。
因为库存和借出是2张数据表zlgl和zljy。
我用下面的代码为什么没有进行判断哦。那里有问题。麻烦高手指点一下小弟哦
         begin
          close;
          sql.clear;
          sql.add('select * from zlgl where bh='''+edit1.text+'''');
          open;
          n:=fieldbyname('kcl').asstring;
          if edit3.Text>n then
          begin
          edit3.SetFocus;
          application.MessageBox('没有足够的库存了','',64);
          modalresult:=mrnone;
          exit;
          end;
          s:='insert into zljy (...) values (...)';
          dm1.ADO1.Execute(s);
      end;

Answer 1

edit3.Text>n 这句算什么呀？改为：
StrToInt (edit3.text) > StrToInt (n)

Answer 2

close;
sql.clear;
sql.add('select * from zlgl where bh=：bh ');
Parameters.ParamByname('bh').Value:=edit1.text;
open;
n:=fieldbyname('kcl').asstring;
点多了易出错！
单步跟踪一下看看