请问在delphi中combobox和checkbox组合在一起实现某个功能怎么写？

Question

一个combobox控件，内容分别是：客户，电话，地址
一个edit控件：输入；
一个checkbox控件：控件为选择项，后面为两个日期控件DateTimePicker1跟DateTimePicker2

如果是单独查询COMBOX1的内容为
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from spsellsum where 客户 like ''%'+edit1.text+'%''');
adoquery1.Open;
其它类式
日期查询代码：
adoquery1.sql.close;
adoquery1.SQL.Add('select * from spsellsum where 销售日期>=:date1 and 销售日期<=:date2 ');
adoquery1.Parameters.ParamByName('date1').Value:=datetostr(datetimepicker1.Date);
adoquery1.Parameters.ParamByName('date2').Value:=datetostr(datetimepicker2.Date);
adoquery1.open;

现在我的问题是：
1。如果checkbox没有选中，查询内容只是combobox的条件，
2。如果checkbox有选中，查询内容是combobox的条件+ 两个DateTimePicker 条件。

现在Edit1Change应该要怎么写？
请帮忙写一下完整的判断条件代码

Answer 1

if checkbox.checked then
begin
//此处实现加上combobox条件的SQL语句
end