Question

delphi 中sql查询语句数字变量的问题

F_dairytao.ADOQuerymain.SQL.Add('select * from Animal where AnimalID ='+strtoint(edit1.Text));
AnimalID是数字类型，我想AnimalID等于edit1.text。请问这个语句如何写。谢谢

Answer 1

Var
AnimalID: Integer;
Begin
If TryStrToInt(Edit1.Text, AnimalID) Then
Begin
...SQL.Add( Format('select * from Animal where AnimalID =%d',[AnimalID]));
End;