第2章窗体及常用组件3

任课教师：杨超电子邮箱:

yangchao_69@163.com测控软件设计1第2章第12节列表框和组合框

列表框(ListBox)组件位于Standard页，可以容纳多条内容并显示出来，供用户选择；组件会根据内容多少自动显示滚动条。除公共属性外，其重要属性如下：(1)AutoComplete：是否可以输入第一个字符实现自动选择；(2)BorderStyle：设置其边界类型；(3)Columns：设置其显示内容的列数；如果只有1列，不能同时显示全部内容时，自动增加垂直滚动条；如果列数>1，不能同时显示全部内容时，自动增加水平滚动条。(4)Count：组件里内容的总(条)数；2第2章第12节列表框和组合框

(5)Items：组件里的所有内容；(6)ItemIndex：组件里的被选中内容对应的索引。(7)MultiSelect：是否可以同时选择多条内容；(8)ExtendedSelect：是否可以扩展选择，即用鼠标画框选择，或用鼠标配合“Shift”键、“Ctrl”键实现多条选择。(9)SelCount：返回被选中条目的数量；(10)Selected[Ind]：判断第Ind条是否被选中；(11)Sorted：是否将组件里的内容自动排序；(12)Style：设置组件的类型。 3第2章第12节列表框和组合框

列表框(ListBox)

的常用事件如下：(1)OnClick：单击组件中的某个条目时发生；(2)OnEnter：获得焦点时发生；(3)OnExit：输入焦点离开时发生；OnClick事件最常用。4第2章第12节列表框和组合框

列表框(ListBox)

属性和方法的使用：组件名.Items.Add(S)：向列表框添加内容；组件名.Clear：清除列表框所有内容；组件名.DeleteSelected：从列表框删除所选内容；组件名.SetFocus：将输入焦点送给列表框。组件名.SelectAll：选中列表框所有内容；组件名.Count：返回列表框所有内容条目数；组件名.Selected[Ind]：判断列表框第Ind条内容是否被选中；组件名.SelCount：返回列表框所选内容个数。5第2章第12节列表框和组合框

组合框(ComboBox)组件位于Standard页，可以容纳多条内容并显示出来，供用户选择；组件会根据内容多少自动显示垂直滚动条。除公共属性外，其重要属性如下：(1)AutoComplete：是否根据输入的第一个字符实现自动选择；(2)AutoDropDown：用户输入一个字符时是否自动打开下拉列表；(3)CharCase：设置组件内容的显示方式(全部大写、正常、全部小写)；(4)DropDownCount：打开下拉列表时显示内容的条数；

(5)Items：组件里的所有内容；(6)Items.Count：组件里内容的总(条)数；6第2章第12节列表框和组合框

(7)ItemIndex：组件里被选中内容对应的索引；

(8)Sorted：是否将组件里的内容自动排序；(9)Style：设置组件的类型；(10)Text：选中的内容文本。组合框每次只能选择一条内容，选中的内容就显示在组件上。组合框(ComboBox)

的常用事件如下：(1)OnClick：单击组件中的某个条目时发生；(2)OnChange：Text属性变化时发生；(3)OnEnter：获得焦点时发生；(4)OnExit：输入焦点离开时发生；7第2章第12节列表框和组合框

组合框(ComboBox)

属性和方法的使用：组件名.Items.Add(S)：向组合框添加内容；组件名.Clear：清除组合框所有内容；组件名.DeleteSelected：从组合框删除所选内容；组件名.SetFocus：将输入焦点送给组合框。组件名.SelectAll：选中组合框所有内容；组件名.Items.Count：返回组合框所有内容条目数；组件名.ItemIndex：返回组合框被选中内容的索引。8第2章列表框和组合框演习

点击将左侧列表框的内容全部送至右侧列表框和组合框点击将右侧组合框的内容全部送至左侧列表框点击将编辑框的内容添加至左侧列表框点击显示组合框和2个列表框内容的信息点击清除备注组件里的信息点击删除左侧列表框选中的内容点击删除左侧列表框的所有内容点击选中左侧列表框的所有内容9第2章第13节

集合组件一、组框(GroupBox)

组框是容器组件，位移Standard页，其它组件放入其中，组框成为放入其中组件的父组件，移动组框，则其中的组件将同时被移动，且相对位置不变。如下图，GroupBox2是单选按钮1～4的容器(父组件)。编写组框的命令代码，只要对其中组件编写事件代码即可。10第2章第13节

集合组件二、单选组框(RadioGroup)

单选组框是容器组件，位移Standard页，是只包含单选按钮的组框(其它组件无法放入其中)，通过Items属性设置其单选项，通过Columns属性设置单选项分几列显示，通过ItemIndex属性设置/获得选中项的索引。最主要事件是：OnClick。与组框的区别：组框无Items、Columns、ItemIndex属性。11第2章第13节

集合组件三、面板(Panel)

面板是容器组件，位移Standard页，其它组件放入其中，面板成为放入其中组件的父组件，移动面板，则其中的组件将同时被移动，且相对位置不变。主要用于对组件分组、布局界面。一般不编写面板事件。

面板的边框形式可通过改变BevelInner、BevelOuter、BorderStyle属性来设置。12第2章第14节更高级的组件一、标签编辑框(LabeledEdit)标签编辑框组件，位于Additional页，或称作带标签的编辑框，由标签和编辑框组合而成的组件，其属性、方法和事件也是二者的组合。该组件以编辑框为主，选中编辑框才能选中该组件；通过EditLabel属性可设置标签的属性，通过LabelPosition属性可改变标签的位置，通过LabelSpacing属性可改变标签与编辑框之间的距离(点数)。13第2章第14节更高级的组件二、颜色组合列表框颜色组合列表框位于Additional页，是可供选择颜色的组合列表框。其重要属性包括：DropDownCount(展开下拉列表时显示的个数)；Selected(选中的颜色)；Style(该组件包含那些颜色)。常用事件：OnChange,OnClick。例如选择颜色改变面板的颜色：procedureTForm1.CBClick(Sender:TObject);beginPanel.Color:=CB.Selected;end;//CB是颜色组合列表框的名称Panel14第2章第14节更高级的组件三、复选列表框(CheckListBox)

复选列表框组件位于Additional页，是包含一系列复选框的列表框组件，因此，该组件的属性、事件和方法是复选框组件与列表框组件的综合。编程时采用列表框组件或复选列表框组件均可，取决于个人喜好，编程的难易程度差别不大。

判断第N

项被选中，对于复选列表框：If组件名.