5.列表类组件
5.1 ListBox
列表框（ListBox）组件同时显示所有选项，其主要属性如下：
属性 | 说明 |
Items | 列表框的选项集合 |
ItemsIndex | 选项的索引值 |
Stored | 选项是否排序 |
Columns | 列表框的列数 |
MultiSelect | 是否可以多项选择 |
SelCount | 被选中的项目的数量，只读属性 |
Selected | 用来设置或返回是否被选中 |
IntegralHeight | 控制是否自动调整，取值： True - 自动调整高度使每行的高度可以完整地被显示 False - 不自动调整高度，非完整高度行被显示在框的底部 |
ItemHeight | 控制列表框中行的高度，Style属性为lbStandard时不能改变 |
Style | 样式，取值如下： lbStandard - 固定Font.Size属性与ItemHeight属性之比 lbOwnerDrawFixed - 可以调整ItemHeight，同时自动调整框的高度以适应行高 lbOwnerDrawVariable - 可以调整ItemHeight，需手动调整框的高度以适应行高 后两个取值将会受到IntegralHeight属性的影响，当IntegralHeight为False时，将不会自动调整框的高度 |
5.2 ComboBox
组合框（comboBox）组件兼有EditBox和ListBox的功能，可以通过输入文本或选择项目来进行操作。主要属性如下：
属性 | 说明 |
Items | 选项集合 |
ItemsIndex | 选项的索引值 |
Stored | 是否排序 |
DropDownCount | 组合框下拉列表显示选项的最大数量 |
SelText | 显示在编辑区中被选中项的内容 |
Style | 组合框风格 |
示例：填写个人信息的表单，界面如下图：
代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
// 确定按钮单击事件
Memo1.Lines.Add('姓名：' + Edit1.Text);
Memo1.Lines.Add('性别：' + ComboBox1.Text);
Memo1.Lines.Add('学历：' + ComboBox2.Text);
Memo1.Lines.Add('专业：' + ComboBox3.Text);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
// 重写按钮单击事件
Edit1.Text := '';
ComboBox1.Text := '';
ComboBox2.Text := '';
ComboBox3.Text := '';
Memo1.Lines.Clear;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
// 取消按钮单击事件
close;
end;