datamoduleunit.rchwADOQuery1.SQL.Add('select * from mjcl where 货物名称 like''%'+combobox3.Text+'%'' and 货物型号 like''%'+combobox4.Text+'%'' and 供应商名 like''%'+combobox9.Text+'%'' and 经手人 like''%'+combobox13.Text+'%'' and 进货时间 between'''+datetostr(DateTimePicker1.Date)+''' and '''+datetostr(DateTimePicker2.Date)+'''');
datamoduleunit.rchwADOQuery1.SQL.Add('select * from mjcl where 货物名称 like''''+'%'+combobox3.Text+'%'+'''' and 货物型号 like''''+'%'+combobox4.Text+'%'+'''' and 供应商名 like''''+'%'+combobox9.Text+'%'+'''' and 经手人 like''''+'%'+combobox13.Text+'%'+'''' and 进货时间 between'''+datetostr(DateTimePicker1.Date)+''' and '''+datetostr(DateTimePicker2.Date)+'''');
要用strtoint()來轉類型