我用popup_list ,为什么选第一个无效？？

Kuja

详细：
(new_dialog "gear" (load_dialog "gear.dcl"))
      (start_list "mod")     
      (setq modshu '("1" "1.25" "1.5" "2" "2.5" "3" "4" "5" "6" "8" "10" "12" "16" "20" "25" "32" "40" "50"))
      (mapcar 'add_list modshu)
      (end_list)
  
      (action_tile "mun" "(setq n1 $value)")
  (action_tile "mod" "(setq mod1 $value)")
  (action_tile "hight" "(setq gh1 $value)")
  (action_tile "d" "(setq d11 $value)")
  (start_dialog)
  (if (= 0 (start_dialog))
       (setq     mod2 (atoi mod1)
                 od (nth mod2 modshu)
                 mod (atof od)
                 n (atoi n1)
                 gh (atof gh1)
                 d1 (atof d11)
                         )
                  )

dcl文件：
gear:dialog {
label="齿数";
:edit_box {
label="输入齿数";
key="mun";
edit_width=8;
}
:popup_list {
label="模数";
key="mod";
edit_width=8;
}
:edit_box {
label="厚度";
key="hight";
edit_width=9;
}
:edit_box {
label="小圆半径";
key="d";
edit_width=9;
}
ok_button;
}

Kuja

每次选首先选1 都会有error: bad argument type: stringp nil

选2或者之后的就没有问题，在选1也没问题，但是那个mod的值是前一次选的值
大家帮忙看看～～谢谢

Kuja

就算第一次选1 都要点一下下拉菜单，再选1
就有效

meflying

建议你在编程是做一些出错处理，比如调用对话框失败、付值未符合要求等的错误处理