with Query2 do
begin
close;
sql.Clear;
sql.add('select 借书证号码,所借日期 from lend where 借书证号码=:qame and 所借日期>现在时间+30天 ');
ParambyName('qame').AsString := edit14.Text;
open;
ShowMessage(IntToStr(RecordCount));
end;现在时间+30天应该如何写哦~~