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

TListBox 是 FireMonkey 框架中的一个常用控件，用于显示一系列项目。本文将详细介绍 TListBox 的使用方法，并提供一些案例说明。

TListBox 的基本用法非常简单。首先，在界面上放置一个 TListBox 控件，然后通过代码来添加项目。

下面是一个简单的示例，演示如何通过代码向 TListBox 中添加项目，并且为每个项目设置点击事件：

```delphi

procedure TForm1.FormCreate(Sender: TObject);

var

ListBoxItem: TListBoxItem;

begin

// 创建并设置 TListBoxItem

ListBoxItem := TListBoxItem.Create(Self);

ListBoxItem.Parent := ListBox1;

ListBoxItem.Text := 'Item 1';

ListBoxItem.OnClick := ListBoxItemClick;

// 添加第二个项目

ListBoxItem := TListBoxItem.Create(Self);

ListBoxItem.Parent := ListBox1;

ListBoxItem.Text := 'Item 2';

ListBoxItem.OnClick := ListBoxItemClick;

end;

procedure TForm1.ListBoxItemClick(Sender: TObject);

begin

// 处理项目点击事件

ShowMessage(TListBoxItem(Sender).Text);

end;

```

上述代码在 FormCreate 事件中创建了两个 TListBoxItem，并添加到一个 TListBox 控件中。每个 TListBoxItem 都有一个文本内容，并且设置了 OnClick 事件。

在 ListBoxItemClick 事件中，使用 ShowMessage 显示了被点击的项目的文本内容。

除了上面的基本用法之外，TListBox 还有许多其他的属性和方法可以用于对控件进行进一步的控制，例如：

- ListBox1.Clear ：清空 TListBox 中的所有项目。

- ListBox1.Count ：获取 TListBox 中项目的数量。

- ListBox1.Items[n] ：获取或设置第 n 个项目的文本内容。

- ListBox1.Selected[n] ：获取或设置第 n 个项目是否被选中。

下面是一个示例，演示如何通过代码清空 TListBox 控件中的项目并将选中的项目保存到一个字符串列表中：

```delphi

procedure TForm1.Button1Click(Sender: TObject);

var

i: Integer;

SelectedItems: TStringList;

begin

// 创建保存选中项目的字符串列表

SelectedItems := TStringList.Create;

try

// 清空 TListBox

ListBox1.Clear;

// 添加新的项目

for i := 1 to 5 do

begin

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

end;

// 设置第二个项目为选中状态

ListBox1.Selected[1] := True;

// 保存选中项目的文本内容到字符串列表中

for i := 0 to ListBox1.Count - 1 do

begin

if ListBox1.Selected[i] then

begin

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

end;

end;

// 显示选中项目的文本内容

ShowMessage(SelectedItems.Text);

finally

SelectedItems.Free;

end;

end;

```

上述代码中的 Button1Click 事件中，首先创建了一个字符串列表 SelectedItems，然后清空 TListBox 控件中的项目，添加了一些新的项目，并将第二个项目设置为选中状态。

接着，通过循环遍历 TListBox 中的所有项目，判断每个项目是否被选中，如果是则将其中的文本内容添加到 SelectedItems 列表中。

最后，使用 ShowMessage 显示 SelectedItems 列表中的所有文本内容。

总结来说，TListBox 是 FireMonkey 框架中一个常用的控件，可以用于显示一系列项目。使用 TListBox 的基本方法非常简单，只需要在界面上放置一个 TListBox 控件，然后通过代码添加项目，并处理点击事件即可。TListBox 还有许多其他的属性和方法可以用于进一步控制控件的行为。 如果你喜欢我们三七知识分享网站的文章， 欢迎您分享或收藏知识分享网站文章 欢迎您到我们的网站逛逛喔！https://www.37seo.cn/