******dcl赋值（新问题）******

aicr317

如有表 （“a” “b” “c”）

对话框如下：

dcl_settings : default_dcl_settings { audit_level = 3; }

pnout : dialog {
    : popup_list {
        label = "pnout";
        key = "pnout";
        mnemonic = "p";
        list = "a\nb\nc";      这里能否把lisp获取的表放进来                   
    }
    ok_only;
}

aicr317

还是感谢一下，还有个问题，用GET_TILE，返回的不是原来的a或b或c,而是顺序号！怎么处理啊！

aicr317

找了一些资料，还没弄明白怎么处理！

LIST及POPUP_LIST的VALUE值应当是列表的索引值，在LISP中返回的是字符串类型的数字。所以，你如果在它们的ACTION里对它们本身调用了SET_TILE函数，那它们将会根据你提供的VALUE重新调整索引值，如果你提供的VALUE第一个字符不是数字，那它的索引值将会是0，否则根据你提供的VALUE里的数字进行调整。

aicr317

找了一下资料，汇总如下：

1.popup_list返回的是索引值，你可根据此控件中的内容做成表，按返回的索引值从表中取出内容

2.列表框返回的是选中的是列表的第几项（从“0”开始），从你的画面上看，应该返回“4”，所以，你应该由这个数字，用(nth  n list) 去你的列表中寻找对应的字符串。

3.

(setq lis '((1 . 10) (2 . 20) (3 . 30))) 
(action_tile "accept" (strcat "(setq i (atoi (get_tile \"p_list\")))"
 "(setq ns (assoc i lis))"
 "(done_dialog)"))
get_tile 返回选中项目的索引值

aicr317

搞定：

 (setq shh (atoi (get_tile "project_name")))  ;;;返回顺序号
           (setq xmdh (nth shh xmdhlb))   ;;;在xmdhlb中，返回第“顺序号”个元素！