日期转换问题

Question

我用DateTimePicker1控件。sql_date:= 'where apply_date>='''+StrToDate(DateTimePicker1.Date)+'''';
sql:='select corp_code from  czzm_zj_licence  '+sql_date;
请问：如果才能使sql正确？

Answer 1

sql:='select corp_code from  czzm_zj_licence where apply_date>=''' +
FormatDateTime('yyyy-mm-dd',DateTimePicker1.Date)+'''';

Answer 2

sql_date:= 'where apply_date>='+#39+DateTimeToStr(DateTimePicker1.Date)+#39;

Answer 3

sql_date:= 'where apply_date>='+''''+DateToStr(DateTimePicker1.Date)+''''

Answer 4

还有一个问题DateTimePicker1控件的显示日期，如何保持和电脑上的一样，这个控件是我昨天放的，显示 2003-7-2 但今天还是显示2003-7-2，