Visual LISP 程序设计第12章

第12章对话框设计12.1概述1.对话框的特点对话框形象、直观，可以随意输入、随时修改，鼠标、键盘并用，是一种深受用户欢迎的界面。对话框用DCL语言（DialogControlLanguage）定义，得到DCL类型的文件，用AutoLISP或C程序驱动。AutoCAD提供了两个重要的DCL文件：ACAD.DCL存放AutoCAD系统定义的对话框，BASE.DCL为用户提供了一些常用的对话框标准控件。2.对话框的组成对话框由若干控件组成，见图12-1。控件可以是按钮、复选框、编辑框、列表或图像等。图12-1对话框的组成图像按钮弹出列表滑动条编辑框按钮图像单选按钮复选框文本3.实例【例12.1】用DCL定义一个简单的对话框。进入VisualLISP环境，将下列源代码输入到文本编辑窗口，选取下拉菜单工具界面工具预览编辑器中的DCL，即可看到图12-2所示该对话框的外观。sample:dialog{label=简单的对话框实例；:text{label=祝您成功！；}:button{key=accept；label=确认；is_default=true；fixed_width=true；alignment=centered；图12-2简单的对话框实例}}12.2对话框控件控件是构造对话框的元件。AutoCAD为用户预定义了23种控件和8个常用的固定控件。每一种控件属于一种类型。每一个控件有多个属性。每个属性都有一个名字和值。多数的属性都有它的默认值。一个控件具有哪些属性是由它的类型所决定的。控件的这些属性确定了它的外观形式和动作行为。例如上例中的确认按钮，它的类型是button。当它的属性label=确认、key=accept、is_default=true、fixed_width=true、alignment=centered，其余属性为默认值时，就确定了图12-2所示的外观。按照控件的特点可以将控件分为以下几类。12.2.1可以定义动作行为的控件这类控件具有动作行为(action)的属性，动作行为是用AutoLISP的函数或表达式表示定义的，用鼠标单击这样的控件时，就会执行相应的函数或表达式。1.按钮（Button）按钮适用于立即产生可视的操作，如退出对话框、弹出子对话框及其它特定操作。每个对话框至少包含一个OK按钮（或功能相当的控件）。按钮的类型是button。有action、alignment、fixed_height、fixed_width、height、is_cancel、is_default、is_enabled、is_tab_stop、key、label、mnemonic、width共13个属性。它的标签（label）显示在按钮上。若要创建与OK等价的控件，其关键字必须为accept，并将其属性is_default设定为true（真）。参照例12－1中确认按钮的定义。2.编辑框（EditBox）编辑框用于输入字符串。它的类型是edit_box。有action、alignment、allow_accept、edit_limit、edit_width、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、label、mnemonic、value、width、password_char16个属性。其标签显示在该框的左边，它的默认宽度为12个字符，当输入的字符多于12时，文本自动向左滚动，框内的字符串即为编辑框的值（value）。图12-3所示的编辑框定义如下：:edit_box{key=test_text；label=长度:；value=100.0；width=12；图12-3编辑框}3.图像按钮(ImageButton)图像按钮将图像显示在按钮上。图像由AutoLISP程序确定。它的类型是image_button。有action、alignment、allow_accept、aspect_ratio、color、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、mnemonic、width13个属性。图像按钮很有用的一个特性是，通过AutoLISP程序可以获取被单击时的位置，从而根据不同的位置设计相应的动作。图12-4所示图像按钮定义的如下：:image_button{key=test_image_button；width=10；aspect_ratio=1.5；图12-4图像按钮}4.列表（ListBbox）列表框的类型是list_box。有action、alignment、allow_accept、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、label、list、mnemonic、multiple_select、tabs、value、width16个属性。列表内含有若干行可供选择的文本，当表的内容超出表的范围时，将自动在表的右侧出现一个滑动条。列表的标签显示在列表框的上方作为文字说明。列表的值是被选中的文本行的序号，序号从0开始。属性multiple_select为true时，允许同时选取框内的多行文本。图12-5列表框图12-5所示对话框的列表定义如下：:list_box{label=齿轮种类；list=圆柱直齿\n圆柱斜齿\n圆锥直齿\n螺旋伞齿\n蜗轮\n蜗杆\n；value=2；key=gear_list；height=6；}图12-5列表框5.下拉列表（PopupList）下拉列表的类型是popup_list。它具有action、alignment、edit_width、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、label、list、mnemonic、tabs、value、width15个属性。下拉列表具有编辑框和列表框的两个特点，初始状态象一个编辑框，标签显示在框的左边，框内只有一行字符和一个向下的箭头，见图12-6（a）。单击框内箭头，将弹出一个列表，见图12-6（b），选取表内文本之后，列表自动关闭，在编辑框内显示选中的内容。下拉列表的值是被选中的文本行的序号。图12-6所示下拉列表的定义如下：:popup_list{label=齿轮种类：；list=圆柱直齿\n圆柱斜齿\n圆锥直齿\n螺旋伞齿\n蜗轮\n蜗杆\n；key=gear_list；}（a）（b）图12-6下拉列表6.单选按钮（RadioButton）单选按钮的类型是radio_button。有action、alignment、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、label、mnemonic、value、width12个属性。单选按钮不宜能单独使用，必须由多个这样的按钮以行或列的形式组成一组，同组的按钮之间是互锁的，只能从中选取一个。单选按钮的标签显示在按钮的右边。图12-7所示单选按钮的定义如下：:radio_button{key=unit_mm；label=毫米；}图12-7单选按钮7.滑动条（Slider）滑动条是一种直观控制数值的控件。点取滑动条上的箭头或拖动滑块，可以得到字符串方式表示的整数。滑动条的类型是slider。有action、alignment、big_increment、fixed_height、fixed_width、height、key、label、layout、max_value、min_value、mnemonic、small_increment、value、width15个属性。属性max_value、min_value确定数值的最大和最小值，small_increment、big_increment确定点击滑动条箭头时的最小、最大增量。图12-8所示滑动条的定义如下：:slider{key=test_slider；min_value=0；max_value=100；}图12-8滑动条8.复选框（Toggle）复选框又称作切换开关、乒乓开关，它的类型是toggle。有action、alignment、fixed_height、fixed_width、height、is_enabled、is_tab_stop、key、label、value、width11个属性。复选框与单选按钮不同的是它可以单独使用，同组的复选框各自是独立的。标签显示在开关的右边。图12-9所示复选框的定义如下：:toggle{label=正交方式；key=ortho_mode；value=1；}图12-9复选框12.2.2组合类控件组合类控件可以将相关的控件组合在一起，使得对话框的布局更加美观、合理，操作更加方便。1.列（Column）列是将若干控件构成垂直分布的一个组件。列的类型是column。有alignment、children_alignment、children_fixed_height、children_fixed_width、fixed_height、fixed_width、height、label、width9个属性。图12-10列图12-11加框列图12-10所示列的定义如下：:column{:button{label=光标拾取；key=pick；}:edit_box{label=x=；width=12；key=x；mnemonic=x；value=0.0；}:edit_box{label=y=；width=12；key=y；mnemonic=y；value=0.0；}}图12-10列2.加框列（BoxedColumn）顾名思义加框列就是加了一个矩形框的列。加框列的类型是boxed_bolumn。有alignment、children_alignment、children_fixed_height、children_fixed_width、fixed_height、fixed_width、height、label、width9个属性。如果将图12-10所示列的定义的第一行:column{改为:boxed_column{label=左下角点；，即可定义一个加框列，见图12-11。图12-11加框列3.互锁列（RadioColumn）若干个单选按钮组成的列即为互锁列。互锁列的类型是radio_column。有alignment、children_alignment、children_fixed_height、children_fixed_width、fixed_height、fixed_width、height、label、width9个属性。互锁列的特点是，它保证了其中只能有一个按钮的值为1，即处于打开状态。图12-12互锁列图12-13加框互锁列图12-12所示互锁列的定义如下：:radio_column{key=size；:radio_button{label=A&0；key=a0；}:radio_button{label=A&1；key=a1；}:radio_button{label=A&2；key=a2；}:radio_button{label=A&3；key=a3；value=1；}:radio_button{label=A&4；key=a4；}:radio_button{label=A&5；key=a5；}}图12-12互锁列图12-13加框互锁列4.加框互锁列（BoxedRadioColumn）加框互锁列就是加了一个矩形框的互锁列。加框互锁列的类型是boxed_radio_column。有alignment、children_alignment、children_fixed_height、children_fixed_width、fixed_height、fixed_width、height、label、width9个属性。如果将图1