Delphi SQL语句中 数值型(Integer) 的引号使用---个人笔记

数据库中2个表  TableA  ，  TableB，

TableA中字段 TypeID 为数值型（Integer）

TableB中字段ID为数值型（Integer），TypeName为字符型（string），

TypeID和ID中的值相,    知道TypeID，得到TypeName

 with adoquery1 do 
 begin
 clsoe;
 sql.lear
 sql.add('select TypeID from TableA');
 open;
 end;
 
 with adoquery2 do
 begin
 clsoe;
 sql.celar;
 sql.add('select TypeName from TableB where ID='+adoquery1.fieldbyname('TypeID').asstring+'   ');
 open;
 end;
 
 
 ShowMessage(adoquery2.FieldByName('TypeName').AsString);

sql.add('select TypeName from TableB where ID='+adoquery1.fieldbyname('TypeID').asstring+'   ');

这句话等价于 sql.add(单引号   select TypeName from TableB where ID=   单引号 加号adoquery1.fieldbyname(单引号TypeID单引号).asstring  加号 单引号         单引号)