Delphi列表框组件（TListBox）使用实例
该组件能够让编程人员集中地管理某类信息，如事件和图像等。Delphi 7 中包含多种列表组件，如列表框组件、动作列表组件、图像列表组件、树型视图组件和列表视图组件等。下面将分别对相应组件进行讲述，并利用示例将各组件的实际用法介绍给读者。
此组件为一个标准的Windows 列表框组件，它用于显示一系列的列表，用户可以选择、加入、删除或修改其中的项目。
1．TLlistBox 组件的典型用法
在Windows 应用程序中，经常要用到列表框。列表框能够在一个可翻滚的窗口中列出多个项让用户选择。例如在Delphi 的IDE 中，当使用“View”菜单上的“Component List”命令时，Delphi 将列出VCL 中的所有组件。
程序中主要利用Items 属性进行各种项目的控制，例如用Items.Strings[]获取某个选项的内容，Items.Add()和Items.Delete()增加或删除选项条目。通过ItemIndex 属性指定或者获取当前选项。
2．TListBox 组件的重要属性
·Columns 列表框的栏数
·ExtendedSelect 此属性用于设置是否允许使用Shift 键和Ctrl 键同时选择多个项
·IntegralHeight 列表框的高度总是列表框中项的高度的整数倍
·ItemHeight 此属性用于设置列表框中每一项的高度
·ItemIndex 此属性用于设置返回列表框中被选择的项的序号
·Items 列表框中所有的项都是通过Items 属性访问的
·MultiSelect 允许同时选择多项
·SelCount 返回当前选择的项的个数
·Selected 此属性用于判断指定的项是否被选择
·Sorted 此属性用于设置列表框中的项是否要按字母顺序排序
·Style 此属性用于设置列表框的风格
下面介绍程序中TListBox 组件常用的属性。
（1）Columns 属性
此属性默认值为0，列表框以单栏显示，如果内容太多，列表框将自动加上一个垂直方向的滚动条。
如果此属性设为大于0 的值，列表框将首先填满一栏。如果在一栏中不能完全显示，就显示在第2 栏、第3 栏，依次类推，但屏幕上最多只显示Columns 属性设置的栏数。
如果此属性设为2，屏幕上只显示两栏，如果实际内容不止两栏，将自动加上一个水平方向的滚动条。
（2）ExtendedSelect 属性
此属性用于设置是否允许使用Shift 键和Ctrl 键同时选择多个项，前提是MultiSelect 属性必须设为True，如果ExtendedSelect 属性设为True，当用户按下并保持住Shift 键时就可以选择多个连续的项，按下并保持住Ctrl 键就可以选择多个项（不一定连续）。
（3）IntegralHeight 属性
如果此属性设为True，且Style 属性设为IsOwnerDrawFixed 时，列表框的高度将自动调整到列表框中项的高度的整数倍。如果此属性设为False，列表框的最后一项可能不能完整地显示，因为列表框的高度不一定正好是ItemHeight 属性的整数倍。
（4）ItemHeight 属性
当Style 属性设为IsOwnerFixed（用户自定义）时，此属性用于设置列表框中每一项的高度。如果IntegralHeight 属性设为True，整个列表框的高度将随着ItemHeight 属性的值自动调整。如果Style属性设为IsStandard 或IsOwnerDrawVariable，ItemHeight 属性将无意义。
