乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
查看： 62|回复： 19

[编程交流] DCL单选按钮

[复制链接]
woodman78

145

主题

590

帖子

446

银币

中流砥柱

Rank: 25

铜币
725
发表于 2022-7-6 11:26:22 | 显示全部楼层 |阅读模式
你好
 
我试图编写一个dcl文件来创建一个对话框，其中有一个由2列2个单选按钮组成的对话框，在该对话框下有一个分别由2列7个单选按钮组成的对话框。dcl中不断出现错误。有人能帮忙吗？？
 
谢谢
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:31:19 | 显示全部楼层
你能把dcl和lsp文件寄出去吗。
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:35:31 | 显示全部楼层
 
 
根据您的描述，我将此作为示例发布。
我希望你张贴你的，这样它可以被修复。
 
  1. example : dialog {                               //*dialog name
  2.          label = "Example Dialog" ;             //*give it a label
  3.          : row {                                //*define row
  4.            : column {                           //*define column
  5.              : boxed_radio_column {             //*define radio column
  6.                label = "A Buttons" ;            //*give it a label
  7.                : radio_button {                 //*define radio_button
  8.                  key = "A1";                    //*give it a name
  9.                  label = "A1";                  //*give it a label
  10.                }                                //*end radio_button
  11.                : radio_button {                 //*define radio_button
  12.                  key = "A2";                    //*give it a name
  13.                  label = "A2";                  //*give it a label
  14.                }                                //*end radio_button
  15.              }                                  //*end boxed_radio_column
  16.            }                                    //*end column
  17.            : column {                           //*define column
  18.              : boxed_radio_column {             //*define radio column
  19.                label = "B Buttons" ;            //*give it a label
  20.                : radio_button {                 //*define radio_button
  21.                  key = "B1";                    //*give it a name
  22.                  label = "B1";                  //*give it a label
  23.                }                                //*end radio_button
  24.                : radio_button {                 //*define radio_button
  25.                  key = "B2";                    //*give it a name
  26.                  label = "B2";                  //*give it a label
  27.                }                                //*end radio_button
  28.              }                                  //*end boxed_radio_column
  29.            }                                    //*end column
  30.          }                                      //*end row
  31.          : row {                                //*define row
  32.            : column {                           //*define column
  33.              : boxed_radio_column {             //*define radio column
  34.                label = "C Buttons" ;            //*give it a label
  35.                : radio_button {                 //*define radio_button
  36.                  key = "C1";                    //*give it a name
  37.                  label = "C1";                  //*give it a label
  38.                }                                //*end radio_button
  39.                : radio_button {                 //*define radio_button
  40.                  key = "C2";                    //*give it a name
  41.                  label = "C2";                  //*give it a label
  42.                }                                //*end radio_button
  43.                : radio_button {                 //*define radio_button
  44.                  key = "C3";                    //*give it a name
  45.                  label = "C3";                  //*give it a label
  46.                }                                //*end radio_button
  47.                : radio_button {                 //*define radio_button
  48.                  key = "C4";                    //*give it a name
  49.                  label = "C4";                  //*give it a label
  50.                }                                //*end radio_button
  51.                : radio_button {                 //*define radio_button
  52.                  key = "C5";                    //*give it a name
  53.                  label = "C5";                  //*give it a label
  54.                }                                //*end radio_button
  55.                : radio_button {                 //*define radio_button
  56.                  key = "C6";                    //*give it a name
  57.                  label = "C6";                  //*give it a label
  58.                }                                //*end radio_button
  59.                : radio_button {                 //*define radio_button
  60.                  key = "C7";                    //*give it a name
  61.                  label = "C7";                  //*give it a label
  62.                }                                //*end radio_button
  63.              }                                  //*end boxed_radio_column
  64.            }                                    //*end column
  65.            : column {                           //*define column
  66.              : boxed_radio_column {             //*define radio column
  67.                label = "D Buttons" ;            //*give it a label
  68.                : radio_button {                 //*define radio_button
  69.                  key = "D1";                    //*give it a name
  70.                  label = "D1";                  //*give it a label
  71.                }                                //*end radio_button
  72.                : radio_button {                 //*define radio_button
  73.                  key = "D2";                    //*give it a name
  74.                  label = "D2";                  //*give it a label
  75.                }                                //*end radio_button
  76.                : radio_button {                 //*define radio_button
  77.                  key = "D3";                    //*give it a name
  78.                  label = "D3";                  //*give it a label
  79.                }                                //*end radio_button
  80.                : radio_button {                 //*define radio_button
  81.                  key = "D4";                    //*give it a name
  82.                  label = "D4";                  //*give it a label
  83.                }                                //*end radio_button
  84.                : radio_button {                 //*define radio_button
  85.                  key = "D5";                    //*give it a name
  86.                  label = "D5";                  //*give it a label
  87.                }                                //*end radio_button
  88.                : radio_button {                 //*define radio_button
  89.                  key = "D6";                    //*give it a name
  90.                  label = "D6";                  //*give it a label
  91.                }                                //*end radio_button
  92.                : radio_button {                 //*define radio_button
  93.                  key = "D7";                    //*give it a name
  94.                  label = "D7";                  //*give it a label
  95.                }                                //*end radio_button
  96.              }                                  //*end boxed_radio_column
  97.            }                                    //*end column
  98.          }                                      //*end row
  99.          ok_cancel ;                            //*predifined OK/Cancel
  100.          : row {                                //*define row
  101.            : paragraph {                        //*define paragraph
  102.              : text_part {                      //*define text
  103.                label = "Designed by BD";        //*give it some text
  104.              }                                  //*end text
  105.              : text_part {                      //*define more text
  106.                label = "for CCC NNRDO";         //*some more text
  107.              }                                  //*end text
  108.            }                                    //*end paragraph
  109.          }                                      //*end row
  110.        }                                        //*end dialog
回复

使用道具 举报

woodman78

145

主题

590

帖子

446

银币

中流砥柱

Rank: 25

铜币
725
发表于 2022-7-6 11:36:36 | 显示全部楼层
秃鹰，
这是我使用的代码：
 
  1.  
  2. radio : dialog {    //dialog name
  3.      label = "Existing Storm Sewers" ;  //give it a label
  4.       :boxed_radio_column_1 {   //*define radio column
  5.       label = "Choose a Type" ;    //*give it a label
  6.        :row{
  7.        : radio_button {   //*define radion button
  8.        key = "T1" ;    //*give it a name
  9.        label = "Type &1" ;   //*give it a label
  10.        //value = "1" ;    //*switch it on
  11.        }     //*end definition
  12.      : radio_button {   //*define radio button
  13.        key = "T2" ;    //*give it a name
  14.        label = "Type &2" ;  //*give it a label
  15.      }     //*end definition
  16.           }
  17.      :Row{
  18. : radio_button {   //*define radio button
  19.        key = "T3" ;    //*give it a name
  20.        label = "Type &3" ; //*give it a label
  21.        }     //*end definition
  22.      : radio_button {   //*define radio button
  23.        key = "T4" ;    //*give it a name
  24.        label = "Type &4" ;  //*give it a label
  25.      }     //*end definition
  26.           }
  27.        }     //*end radio column
  28.     
  29.       :boxed_radio_column_2 {   //*define radio column
  30.       label = "Choose a Size" ;    //*give it a label
  31.        :row{
  32.        : radio_button {   //*define radion button
  33.        key = "S1" ;    //*give it a name
  34.        label = "1500mm" ;   //*give it a label
  35.        //value = "1" ;    //*switch it on
  36.        }     //*end definition
  37.      : radio_button {   //*define radio button
  38.        key = "S2" ;    //*give it a name
  39.        label = "1350mm" ;  //*give it a label
  40.      }     //*end definition
  41.           }
  42.      :Row{
  43. : radio_button {   //*define radio button
  44.        key = "S3" ;    //*give it a name
  45.        label = "1200mm" ; //*give it a label
  46.        }     //*end definition
  47.      : radio_button {   //*define radio button
  48.        key = "S4" ;    //*give it a name
  49.        label = "1050mm" ;  //*give it a label
  50.      }     //*end definition
  51.           }
  52.        }
  53. ok_cancel ;    //predifined OK/Cancel
  54.     : row {     //define row
  56.     : paragraph {    //define paragraph
  57.     : text_part {    //define text
  58.     label = "Designed by Brian Deasy";  //give it some text
  59.     }      //end text
  60.     : text_part {    //define more text
  61.     label = "for CCC NNRDO";   //some more text
  62.     }      //end text
  63.     }      //end paragraph
  64.     }      //end row
  65.     
  66.     }      //end dialog

 
你的例子很好。我想做的一件不同的事是，我希望每行只有一个框，但要保持按钮布局，这样第一个框中有4个，第二个框中有14个。
 
谢谢
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:41:07 | 显示全部楼层
 
你能把Lisp程序也发出来吗。
回复

使用道具 举报

woodman78

145

主题

590

帖子

446

银币

中流砥柱

Rank: 25

铜币
725
发表于 2022-7-6 11:43:39 | 显示全部楼层
我只是使用lisp加载对话框，只是为了首先获得正确的布局。在我知道这是否可能之前，我还没有开始。
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:48:31 | 显示全部楼层
 
我正在进行你的第一次描述，但是你似乎希望现在做不同的事情，我不确定你在描述什么。我还需要你用来测试dcl的lisp。我不在乎它是否完整。你说你测试过了，所以你一定有什么东西？
 
我只是想帮你，但你需要在你的帖子里说清楚。
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:50:08 | 显示全部楼层
 
从上面的描述中，我认为这就是你想要的。
不确定，但我不推荐这种布局，因为它的高度太长。让我知道。
 
  1. example : dialog {                               //*dialog name
  2.          label = "Example Dialog" ;             //*give it a label
  3.          : row {                                //*define row
  4.            : column {                           //*define column
  5.              : boxed_radio_column {             //*define radio column
  6.                label = "A Buttons" ;            //*give it a label
  7.                : radio_button {                 //*define radio_button
  8.                  key = "A1";                    //*give it a name
  9.                  label = "A1";                  //*give it a label
  10.                }                                //*end radio_button
  11.                : radio_button {                 //*define radio_button
  12.                  key = "A2";                    //*give it a name
  13.                  label = "A2";                  //*give it a label
  14.                }                                //*end radio_button
  15.                : radio_button {                 //*define radio_button
  16.                  key = "A3";                    //*give it a name
  17.                  label = "A3";                  //*give it a label
  18.                }                                //*end radio_button
  19.                : radio_button {                 //*define radio_button
  20.                  key = "A4";                    //*give it a name
  21.                  label = "A4";                  //*give it a label
  22.                }                                //*end radio_button
  23.              }                                  //*end boxed_radio_column
  24.            }                                    //*end column
  25.          }                                      //*end row
  26.          : row {                                //*define row
  27.            : column {                           //*define column
  28.              : boxed_radio_column {             //*define radio column
  29.                label = "B Buttons" ;            //*give it a label
  30.                : radio_button {                 //*define radio_button
  31.                  key = "B1";                    //*give it a name
  32.                  label = "B1";                  //*give it a label
  33.                }                                //*end radio_button
  34.                : radio_button {                 //*define radio_button
  35.                  key = "B2";                    //*give it a name
  36.                  label = "B2";                  //*give it a label
  37.                }                                //*end radio_button
  38.                : radio_button {                 //*define radio_button
  39.                  key = "B3";                    //*give it a name
  40.                  label = "B3";                  //*give it a label
  41.                }                                //*end radio_button
  42.                : radio_button {                 //*define radio_button
  43.                  key = "B4";                    //*give it a name
  44.                  label = "B4";                  //*give it a label
  45.                }                                //*end radio_button
  46.                : radio_button {                 //*define radio_button
  47.                  key = "B5";                    //*give it a name
  48.                  label = "B5";                  //*give it a label
  49.                }                                //*end radio_button
  50.                : radio_button {                 //*define radio_button
  51.                  key = "B6";                    //*give it a name
  52.                  label = "B6";                  //*give it a label
  53.                }                                //*end radio_button
  54.                : radio_button {                 //*define radio_button
  55.                  key = "B7";                    //*give it a name
  56.                  label = "B7";                  //*give it a label
  57.                }                                //*end radio_button
  58.                : radio_button {                 //*define radio_button
  59.                  key = "B8";                    //*give it a name
  60.                  label = "B8";                  //*give it a label
  61.                }                                //*end radio_button
  62.                : radio_button {                 //*define radio_button
  63.                  key = "B9";                    //*give it a name
  64.                  label = "B9";                  //*give it a label
  65.                }                                //*end radio_button
  66.                : radio_button {                 //*define radio_button
  67.                  key = "B10";                    //*give it a name
  68.                  label = "B10";                  //*give it a label
  69.                }                                //*end radio_button
  70.                : radio_button {                 //*define radio_button
  71.                  key = "B11";                    //*give it a name
  72.                  label = "B11";                  //*give it a label
  73.                }                                //*end radio_button
  74.                : radio_button {                 //*define radio_button
  75.                  key = "B12";                    //*give it a name
  76.                  label = "B12";                  //*give it a label
  77.                }                                //*end radio_button
  78.                : radio_button {                 //*define radio_button
  79.                  key = "B13";                    //*give it a name
  80.                  label = "B13";                  //*give it a label
  81.                }                                //*end radio_button
  82.                : radio_button {                 //*define radio_button
  83.                  key = "B14";                    //*give it a name
  84.                  label = "B14";                  //*give it a label
  85.                }                                //*end radio_button
  86.              }                                  //*end boxed_radio_column
  87.            }                                    //*end column
  88.          }                                      //*end row
  89.          : row {                                //*define row
  90.            ok_cancel ;                            //*predifined OK/Cancel
  91.            : paragraph {                        //*define paragraph
  92.              : text_part {                      //*define text
  93.                label = "Designed by BD";        //*give it some text
  94.              }                                  //*end text
  95.              : text_part {                      //*define more text
  96.                label = "for CCC NNRDO";         //*some more text
  97.              }                                  //*end text
  98.            }                                    //*end paragraph
  99.          }                                      //*end row
  100.        }                                        //*end dialog
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:54:32 | 显示全部楼层
这是我为测试提供的dcl和lsp。
您的主要问题是命名boxed\u radio\u列，您将其称为boxed\u radio\u column\u 1等等。
还有一些行放错了位置，没有列。
请尝试开发一个更整洁的格式，这将有助于避免一些错误。
 
我会让你完成剩下的。使用我上面提供的示例。
如果你被卡住了，请告诉我。
 
DCL
  1. radio : dialog {    //dialog name
  2.        label = "Existing Storm Sewers" ;  //give it a label
  3.        : row {
  4.          : column {
  5.            : boxed_radio_column {   //*define radio column
  6.              label = "Choose a Type" ;    //*give it a label
  7.              : radio_button {   //*define radion button
  8.                key = "T1" ;    //*give it a name
  9.                label = "Type &1" ;   //*give it a label
  10.                //value = "1" ;    //*switch it on
  11.              }     //*end definition
  12.              : radio_button {   //*define radio button
  13.                key = "T2" ;    //*give it a name
  14.                label = "Type &2" ;  //*give it a label
  15.              }     //*end definition
  16.            }
  17.          }
  18.          : column {
  19.            : boxed_radio_column {   //*define radio column
  20.              : radio_button {   //*define radio button
  21.                key = "T3" ;    //*give it a name
  22.                label = "Type &3" ; //*give it a label
  23.              }     //*end definition
  24.              : radio_button {   //*define radio button
  25.                key = "T4" ;    //*give it a name
  26.                label = "Type &4" ;  //*give it a label
  27.              }     //*end definition
  28.            }
  29.          }     //*end column
  30.        }     //*end row
  31.        : row {
  32.          : column {
  33.            : boxed_radio_column {   //*define radio column
  34.              label = "Choose a Size" ;    //*give it a label
  35.              : radio_button {   //*define radion button
  36.                key = "S1" ;    //*give it a name
  37.                label = "1500mm" ;   //*give it a label
  38.                //value = "1" ;    //*switch it on
  39.              }     //*end definition
  40.              : radio_button {   //*define radio button
  41.                key = "S2" ;    //*give it a name
  42.                label = "1350mm" ;  //*give it a label
  43.              }     //*end definition
  44.            }
  45.          }
  46.          : column {
  47.            : boxed_radio_column {   //*define radio column
  48.              label = "?" ;    //*give it a label
  49.              : radio_button {   //*define radio button
  50.                key = "S3" ;    //*give it a name
  51.                label = "1200mm" ; //*give it a label
  52.              }     //*end definition
  53.              : radio_button {   //*define radio button
  54.                key = "S4" ;    //*give it a name
  55.                label = "1050mm" ;  //*give it a label
  56.              }     //*end definition
  57.            }
  58.          }
  59.        }
  60.        : row {     //define row
  61.          ok_cancel ;    //predifined OK/Cancel
  62.          : paragraph {    //define paragraph
  63.            : text_part {    //define text
  64.              label = "Designed by Brian Deasy";  //give it some text
  65.            }      //end text
  66.            : text_part {    //define more text
  67.              label = "for CCC NNRDO";   //some more text
  68.            }      //end text
  69.          }      //end paragraph
  70.        }      //end row
  71.      }      //end dialog

 
LSP
  1. (defun C:RADIO ()
  2.  (setq dcl_id (load_dialog "radio.dcl")) ;load dialog
  3.  (if
  4.    (not (new_dialog "radio" dcl_id) ;test for dialog
  5.    );not
  6.    (progn
  7.      (alert "Can not find your dcl file")
  8.      (exit) ;exit if no dialog
  9.    )
  10.  );if
  11.  (action_tile "cancel" ;if cancel button pressed
  12.   "(done_dialog)(setq userclick nil)" ;close dialog, set flag
  13.  );action_tile
  14.  (action_tile "accept" ;if O.K. pressed
  15.   "(done_dialog)(setq userclick T))" ;??? Is this standard code.
  16.  );action tile
  17.  (start_dialog) ;start dialog
  18.  (unload_dialog dcl_id) ;unload
  21. )
回复

使用道具 举报

The Buzzard

32

主题

1166

帖子

1146

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2022-7-6 11:57:30 | 显示全部楼层
这是上面的代码格式，我认为是你想要的方式。
如果可以的话，请告诉我。
所有新增单选按钮都有（？）用于标签。我没有这个信息。
 
无线电广播dcl
  1. radio : dialog {                                 //*dialog name
  2.        label = "Existing Storm Sewers";         //*give it a label
  3.        : row {                                  //*define row
  4.          : column {                             //*define column
  5.            : boxed_radio_column {               //*define radio column
  6.              label = "Choose a Type";           //*give it a label
  7.              : radio_button {                   //*define radion button
  8.                key = "T1";                      //*give it a name
  9.                label = "Type &1";               //*give it a label
  10.              //value = "1";                     //*switch it on
  11.              }                                  //*end definition
  12.              : radio_button {                   //*define radio button
  13.                key = "T2";                      //*give it a name
  14.                label = "Type &2";               //*give it a label
  15.              }                                  //*end definition
  16.              : radio_button {                   //*define radio button
  17.                key = "T3";                      //*give it a name
  18.                label = "Type &3";               //*give it a label
  19.              }                                  //*end definition
  20.              : radio_button {                   //*define radio button
  21.                key = "T4" ;                     //*give it a name
  22.                label = "Type &4";               //*give it a label
  23.              }                                  //*end definition
  24.            }                                    //*end boxed_radio_column
  25.          }                                      //*end column
  26.        }                                        //*end row
  27.        : row {                                  //*define row
  28.          : column {                             //*define column
  29.            : boxed_radio_column {               //*define radio column
  30.              label = "Choose a Size";           //*give it a label
  31.              : radio_button {                   //*define radion button
  32.                key = "S1" ;                     //*give it a name
  33.                label = "1500mm";                //*give it a label
  34.              //value = "1";                     //*switch it on
  35.              }                                  //*end definition
  36.              : radio_button {                   //*define radio button
  37.                key = "S2";                      //*give it a name
  38.                label = "1350mm";                //*give it a label
  39.              }                                  //*end definition
  40.              : radio_button {                   //*define radio button
  41.                key = "S3";                      //*give it a name
  42.                label = "1200mm";                //*give it a label
  43.              }                                  //*end definition
  44.              : radio_button {                   //*define radio button
  45.                key = "S4";                      //*give it a name
  46.                label = "1050mm";                //*give it a label
  47.              }                                  //*end definition
  48.              : radio_button {                   //*define radio button
  49.                key = "S5";                      //*give it a name
  50.                label = "?";                     //*give it a label
  51.              }                                  //*end definition
  52.              : radio_button {                   //*define radio button
  53.                key = "S6";                      //*give it a name
  54.                label = "?";                     //*give it a label
  55.              }                                  //*end definition
  56.              : radio_button {                   //*define radio button
  57.                key = "S7";                      //*give it a name
  58.                label = "?";                     //*give it a label
  59.              }                                  //*end definition
  60.              : radio_button {                   //*define radio button
  61.                key = "S8";                      //*give it a name
  62.                label = "?";                     //*give it a label
  63.              }                                  //*end definition
  64.              : radio_button {                   //*define radio button
  65.                key = "S9";                      //*give it a name
  66.                label = "?";                     //*give it a label
  67.              }                                  //*end definition
  68.              : radio_button {                   //*define radio button
  69.                key = "S10";                     //*give it a name
  70.                label = "?";                     //*give it a label
  71.              }                                  //*end definition
  72.              : radio_button {                   //*define radio button
  73.                key = "S11";                     //*give it a name
  74.                label = "?";                     //*give it a label
  75.              }                                  //*end definition
  76.              : radio_button {                   //*define radio button
  77.                key = "S12";                     //*give it a name
  78.                label = "?";                     //*give it a label
  79.              }                                  //*end definition
  80.              : radio_button {                   //*define radio button
  81.                key = "S13";                     //*give it a name
  82.                label = "?";                     //*give it a label
  83.              }                                  //*end definition
  84.              : radio_button {                   //*define radio button
  85.                key = "S14";                     //*give it a name
  86.                label = "?";                     //*give it a label
  87.              }                                  //*end definition
  88.            }                                    //*end boxed_radio_column
  89.          }                                      //*end column
  90.        }                                        //*end row
  91.        : row {                                    //*define row
  92.          : column {                               //*define column
  93.            ok_cancel ;                            //*predifined OK/Cancel
  94.            : paragraph {                          //*define paragraph
  95.              : text_part {                        //*define text
  96.                label = "Designed by Brian Deasy"; //*give it some text
  97.              }                                    //*end text
  98.              : text_part {                        //*define more text
  99.                label = "for CCC NNRDO";           //*some more text
  100.              }                                    //*end text
  101.            }                                      //*end paragraph
  102.          }                                        //*end column
  103.        }                                          //*end row
  104.      }                                            //*end dialog

 
下面的lisp文件仅用于测试上述dcl的外观。
 
无线电广播lsp
  1. (defun C:RADIO ()
  2.  (setq dcl_id (load_dialog "radio.dcl")) ;load dialog
  3.  (if
  4.    (not (new_dialog "radio" dcl_id)      ;test for dialog
  5.    )                                     ;not
  6.    (progn
  7.      (alert "Can not find your dcl file")
  8.      (exit)                              ;exit if no dialog
  9.    )
  10.  )                                       ;if
  11.  (action_tile "cancel"                   ;if cancel button pressed
  12.   "(done_dialog)(setq userclick nil)"    ;close dialog, set flag
  13.  )                                       ;action_tile
  14.  (action_tile "accept"                   ;if O.K. pressed
  15.   "(done_dialog)(setq userclick T))"     ;??? Is this standard code.
  16.  )                                       ;action tile
  17.  (start_dialog)                          ;start dialog
  18.  (unload_dialog dcl_id)                  ;unload
  19. )
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-6 02:30 , Processed in 0.331536 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表