delphi edit赋值没反应

if  RadioButton3.Checked = true then
   begin
   edit1.Text:='';
   edit2.Text:='';
    if combobox9.Text<>'第四季度' then
    begin
     if combobox9.Text='第一季度' then
     begin
     edit1.text:=combobox8.Text+'/'+'01'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'04'+'/'+'01';
     end
     else if combobox9.Text='第二季度' then
     begin
     edit1.text:=combobox8.Text+'/'+'04'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'07'+'/'+'01';
     end
     else if combobox9.Text='第三季度' then
     begin
     edit1.text:=combobox8.Text+'/'+'07'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'10'+'/'+'01';
     end;
     sql1 :=sql1+ 'and ghsj>= '+''''+trim(Edit1.Text)+''''  +  'and ghsj< '+''''+trim(Edit2.Text)+'''';
     end
    else if combobox9.Text='第四季度' then
     begin
     edit1.text:=combobox8.Text+'/'+'10'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'12'+'/'+'31';
     sql1 :=sql1+ 'and ghsj>= '+''''+trim(Edit1.Text)+''''  +  'and ghsj<= '+''''+trim(Edit2.Text)+'''';
     ShowMessage(sql1);
     edit3.Text:=sql1;
     end;
     end;
类似于edit1.text:=combobox8.Text+'/'+'07'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'10'+'/'+'01';的语句均没执行，直接跳过；它的上面也有一个if判断语句，其中也有edit的赋值，但是运行正常，为什么？

答案：语句本身没问题。你是的判断逻辑问题吧。你跟踪下看看吧

其他：会不会跟踪？F8 + 移动光标到跟踪点 1.你说的不太清楚,
'它的上面也有一个if判断语句，其中也有edit的赋值，但是运行正常'这句话是指
   edit1.Text:='';
   edit2.Text:='';
这两句吗?

2.断点跟踪程序看是否真的没有执行
     edit1.text:=combobox8.Text+'/'+'07'+'/'+'01';
     edit2.text:=combobox8.Text+'/'+'10'+'/'+'01';
   这些语句.
3.确定你的combobox控件的style是csDropDown还是csDropDownList. 若是后者则取text值有误.

可以追问我. 

上一个：delphi 编程报错？什么意思？
下一个：求一个好用的Delphi破解版本的下载地址 (C++语言）功能要好点的，适合新手的