请教delphi中sql语句的写法

Question

例如：select * from sfism4.r_equip_info where (nwmaintdate-sysdate)<=form1.g_alertday 我要使得nwmaintdate-sysdate的值小于一个整数值，这个整数是一个属于form1的变量，请问如何把这个语句添加到sql.add('   ')方法中

Answer 1

select *
from sfism4.r_equip_info 
where (nwmaintdate-sysdate)<='''+form1.g_alertday+'''
如果g_alertday为整型的，用函数inttostr()

Answer 2

nwmaintdate-sysdate的结果是一个数值，而inttostr(form1.g_alertday)是字符串，这样比较可以吗？

Answer 3

var
  SQLStr: String;
  ...
begin
  ...
  SQLStr := 'select * from sfism4.r_equip_info ';
  SQLStr := SQLStr + 'where (nwmaintdate-sysdate) <= ';
  SQLStr := SQLStr + IntToStr(form1.g_alertday);
  sql.add(SQLStr);
  ...
end;

Answer 4

sql := 'select * from sfism4.r_equip_info where (nwmaintdate-sysdate)<='+inttostr(form1.g_alertday);