radiobutton出错.................................

procedure TForm2.FlatSpeedButton6Click(Sender: TObject);
var
num,mz,sex,jg,department,bj:string;
begin
num:=flatedit8.text;
mz:=flatedit9.Text;
jg:=flatedit12.Text;
department:=flatedit13.text;
bj:=flatedit14.text;
   with adoquery3 do
 begin
     close;
    sql.Clear;
    sql.Add('insert into member(学号,姓名,性别,籍贯,所在系别,所在班级) values('+num+','''+mz+''','''+sex+''','''+jg+''','''+department+''','''+bj+''')');
    showmessage(adoquery3.sql.text);
    execsql;
    update;
    showmessage('添加成功，请按确定返回');
end;
end;我在begin前面加上一个   if flatradiobutton1.checked then sex:='男'
  else if flatradiobutton2.checked then sex:='女'
  else
就是通过radiobutton判断性别的啊
之后点击提交按钮没有反应了啦，就是sql语句根本没有执行了
就像这个按钮没有添加事件的样子
怎么回事还有一个问题就是
我命名‘名字’字段的时候取名为'name'
下面就东错西错，所以改成mz了，