这个问题如何解决？

Question

if (trim(Edt_data_Beg.Text)<>'')  and (trim(Edt_data_end.Text)='') then
   begin
//    Beg_time:=strToDate(Edt_data_Beg.Text);
    seekWhat:='and  STR_DD  > ''#trim(Edt_data_Beg.Text)# '' '; //？？
   end
 else
    seekWhat:='';   
----------------------------------
ADODataSet_tf_card.CommandText:=
        'select * from TF_CARD'+' '+list_or_not+' '+seekWhat+' '+'order by '+orderby_what+' '+' ASC ';其中STR_DD为Datetime字段 
关键是 seekWhat:='and  STR_DD  > ''#trim(Edt_data_Beg.Text)# '' ';
如何写！

Answer 1

' and STR_DD>'''+trim(Edt_Data_Beg.Text)+''' and'

Answer 2

seekwhat=format('and STR_DD>''#%s#''',[trim(Edt_data_Beg.Text)]);

Answer 3

seekWhat:='and  STR_DD  > #'+trim(Edt_data_Beg.Text)+'# ';