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

TListBox是FireMonkey框架下的一个列表框控件，它允许我们在一个窗体或页面中显示一组项目，并且用户可以通过滚动列表或手势选择其中的某个项目。在此，我们将讨论TListBox的使用方法，包括创建、添加项目、设置属性和事件处理等。

一、创建TListBox

首先，我们需要创建一个新的FMX项目。在新项目中，我们可以从下拉菜单中选择TListBox控件来放置在窗体或页面上，或者使用代码来动态创建TListBox对象。具体代码如下：

var

ListBox1: TListBox;

begin

ListBox1 := TListBox.Create(Self); // 在当前窗体上创建TListBox控件

ListBox1.Parent := Self; // 设置TListBox控件的父控件为当前窗体

end;

二、添加项目

要向TListBox添加项目，可以使用AddItem方法，该方法有两个参数，第一个是项目的显示文本，第二个是项目的对象，如果不需要可以设置为空。具体代码如下：

ListBox1.Items.Add('Item 1', nil); // 添加一个新项目，没有对象

ListBox1.Items.AddObject('Item 2', TObject.Create); // 添加一个新项目，包含一个对象

三、设置属性

TListBox还有许多有用的属性可以帮助我们控制它的外观和行为。例如，列表框的宽度和高度可以通过Width和Height属性来设置，而每个项目的高度可以通过ItemHeight属性来设置。

另外，TListBox还有许多其他属性可以控制滚动条的可见性、项目的多选或单选，以及项目背景的颜色等等。这些属性可以通过对象查看器或代码进行设置。具体代码如下：

ListBox1.Width := 200; // 设置宽度

ListBox1.Height := 300; // 设置高度

ListBox1.ItemHeight := 50; // 设置项目高度

ListBox1.ShowScrollBars := TScrollStyle.Both; // 设置滚动条为可见

ListBox1.SelectionMode := TListBoxSelectionMode.Single; // 设置单选模式

ListBox1.Fill.Color := TAlphaColorRec.Lightgray; // 设置背景颜色

四、事件处理

当用户与TListBox交互时，我们可以使用一些事件来响应其操作。例如，当用户选择项目时，我们可以使用OnItemClick事件来触发一些操作。而当列表框滚动时，可以使用OnViewportPositionChange事件来调整项目的外观和样式。

除上述事件外，还有其他事件可以帮助我们处理TListBox的行为，例如OnDblClick、OnKeyDown和OnMouseWheel等。这些事件可以通过对象查看器或代码来设置。具体代码如下：

procedure TForm1.ListBox1ItemClick(const Sender: TCustomListBox;

const Item: TListBoxItem);

begin

ShowMessage(Item.Text); // 在消息框中显示选择的项目

end;

procedure TForm1.ListBox1ViewportPositionChange(const Sender: TObject;

const OldViewportPosition, NewViewportPosition: TPointF; const ContentSizeChanged: Boolean);

begin

// 在这里处理列表框滚动时的操作

end;

综上所述，TListBox是一个非常有用的控件，可以帮助我们创建具有滚动列表和选择项目功能的用户界面。希望以上介绍对您有所帮助。 如果你喜欢我们三七知识分享网站的文章， 欢迎您分享或收藏知识分享网站文章 欢迎您到我们的网站逛逛喔！https://www.37seo.cn/