Delphi，XE2，之，FireMonkey，入门(41)，-，控件基础:，TListBox

TListBox 是 FireMonkey 中常用的列表控件之一，用于展示一组数据。TListBox 允许用户在列表中选择一项或多项，同时也提供了多种样式和布局选项。

使用 TListBox 控件

要使用 TListBox 控件，步骤如下：

1. 首先在 Form 中拖放 TListBox 控件。

2. 为 TListBox 控件添加项目，有两种方式：

- 在控件的 “Items” 属性下点击 “+” 号按钮，手动添加每一项。

- 通过代码添加，代码示例如下：

```delphi

var

i: Integer;

begin

for i := 1 to 10 do

begin

ListBox1.Items.Add('Item ' + IntToStr(i));

end;

end;

```

3. 设置 TListBox 控件的显示模式，默认为 “vsList”，还有“vsReport”和“vsIcon”模式。

- “vsList” 模式：列表模式，每个项目单独一行。

- “vsReport” 模式：类似于 ListView 的报表模式，每行可能包含多个单元格。

- “vsIcon” 模式：类似于 ListView 的大图标模式，每个项目会显示一个图标。

可在 TListBox 控件的属性面板中的 “ViewStyle” 进行设置。还可以通过代码方式设置：

```delphi

ListBox1.ViewStyle := TListBoxViewStyle.vsReport;

```

4. 设置 TListBox 控件的选择模式，默认为 “Single”，还有 “Multi” 和 “None” 模式。

- “Single” 模式：只允许选中单个项目。

- “Multi” 模式：允许多选。

- “None” 模式：不允许选中。

可在 TListBox 控件的属性面板中的 “SelectionMode” 进行设置。还可以通过代码方式设置：

```delphi

ListBox1.SelectionMode := TSelectionMode.Multi;

```

使用案例

下面是一个使用 TListBox 控件的简单示例，在列表中展示了一些颜色，并且可以多选。

1. 在 Form 中拖放一个 TListBox 控件。

2. 在 Form 的 OnCreate 事件中添加以下代码：

```delphi

var

i: Integer;

begin

ListBox1.ViewStyle := TListBoxViewStyle.vsList;

ListBox1.SelectionMode := TSelectionMode.Multi;

for i := low(TAlphaColorNames) to high(TAlphaColorNames) do

begin

ListBox1.Items.Add(TAlphaColorNames[i]);

end;

end;

```

3. 运行程序，在列表中选择多个颜色，如下图所示：


总结

本文介绍了 TListBox 的基本使用方法和部分属性设置。通过本文，您应该可以快速上手 TListBox 控件的使用，实现自己的列表展示效果。 如果你喜欢我们三七知识分享网站的文章， 欢迎您分享或收藏知识分享网站文章 欢迎您到我们的网站逛逛喔！https://www.37seo.cn/