E
esgeht
Unregistered / Unconfirmed
GUEST, unregistred user!
var
year1,month1,day1:word;
begin
decodedate(date+1,year1,month1,day1);
Query1.close;
with Query1 do begin
with SQL do begin
Clear;
Add('select * from data.db');
Add('where type=''公历''');
Add('and month='''+inttostr(month1)+''' and day='''+inttostr(day1)+'''');
～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～
总是报这一句出错，在数据表中month,day字段都是字符串类型
end;
year1,month1,day1:word;
begin
decodedate(date+1,year1,month1,day1);
Query1.close;
with Query1 do begin
with SQL do begin
Clear;
Add('select * from data.db');
Add('where type=''公历''');
Add('and month='''+inttostr(month1)+''' and day='''+inttostr(day1)+'''');
～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～
总是报这一句出错，在数据表中month,day字段都是字符串类型
end;