若时间字段时字符型: Query1.SQL.Add(Format('Select * From %s Where FieldName=''%s-%s-%s''',[tablename,ComboBox1.Text,ComboBox2.Text,ComboBox3.Text]); 若时间字段时时间类型: year:=StrToInt(Combobox1.text); month:=StrToInt(Combobox2.text); day:=StrToInt(Combobox3.text); time:=EncordDate(year,month,day); Add('select * From tablename where FieldName='+DateTimeToStr(time)):
Query1.SQL.Add(Format('Select * From %s Where FieldName=''%s-%s-%s''',[tablename,ComboBox1.Text,ComboBox2.Text,ComboBox3.Text]);
若时间字段时时间类型:
year:=StrToInt(Combobox1.text);
month:=StrToInt(Combobox2.text);
day:=StrToInt(Combobox3.text);
time:=EncordDate(year,month,day);
Add('select * From tablename where FieldName='+DateTimeToStr(time)):
'select * from lib_qdxxb where FieldName=:pDate';
Query1.ParamByName('pDate').AsDate := StrToDate(ComboBox1.Text + '-' + ComboBox2.Text + '-' + ComboBox3.Text);