一个delphi中调用sql的问题

Question

sql := 'insert into animals (size) values(''' + Edit1.Text + ''')'

Answer 1

sql := 'insert into animals (size) values(' + Edit1.Text + ')' 

Answer 2

size为interger,只需这样即可
Query1.SQL.Add('insert into animals (size) values ('+Edit1.Text+')');

Answer 3

with Query1 do
begin 
  Close; 
  SQL.Clear; 
  SQL.Add('insert into animals (size) values(:size)');  
  ParamByName('size').AsInteger:=StrToInt(trim(Edit1.Text)); 
  Prepare;
  ExecSQL; 
end;

Answer 4

传参数用JonHua的方法解决，不传参数用Barbarian的方法！在你的方法中的错误是Integer不应有双引号，使用双引号不利于以后更换数据库喔！