Delphi for iOS开发指南(6):在iOS应用程序中使用ComboBox组件来从列表中选择某一项

转载 2013年09月03日 09:12:09

FireMonkey iOS应用程序中实现一个选择器

 

iOS平台上,FireMonkey使用TComboBox组件来封装选择器组件:

 

要定义一个选择器并且列出可以选择的项目:

1.        选择File>New>FireMonkey Mobile Application – Delphi>Blank Application

2.        Tool Palette中选择TComboBox组件,然后拖到FireMonkey Mobile Form Designer上去。

要找到TComboBox,在ToolPalette的搜索框中输入开头的几个字母(“Com”):

3.        在你拖好控件之后,你就可以在Form Designer上看到这个TComboBox组件了。

右击TComboBox组件,选择Items Editor…

4.        要定义项目列表,多点几次Add Item

5.        Structure View中,选择ListBoxItem1(列表中的第一项)。

6.        Object Inspector中,编辑ListBoxItem1Text属性。

在这个例子中,(USA55个州),第一项为“Alabama”。

7.        也把其他项目编辑好,例如AlaskaArizonaArkansasCaliforniaColorado,等等。

8.        iOS SimulatoriOS Device目标平台上运行这个应用程序。

你在点按TComboBox之后,Picker控件就会出现,之后你就可以选择一个项目了。

 

 

 

 

使用代码来建立项目列表

 

要用代码建立项目列表,你可以像下面的代码一样使用Add方法:

  1. procedure TForm27.FormCreate(Sender: TObject);  
  2. begin  
  3.   ComboBox1.Items.Add('Alabama');  
  4.   ComboBox1.Items.Add('Alaska');  
  5.   ComboBox1.Items.Add('Arizona');  
  6.   ComboBox1.Items.Add('Arkansas');  
  7.   ComboBox1.Items.Add('California');  
  8.   // Other states can be listed here   
  9.   ComboBox1.Items.Add('Virginia');  
  10.   ComboBox1.Items.Add('Washington');  
  11.   ComboBox1.Items.Add('West Virginia');  
  12.   ComboBox1.Items.Add('Wisconsin');  
  13.   ComboBox1.Items.Add('Wyoming');  
  14. end;  
  15.   
  16.    


 

 

 

 

显示指定的项

 

当前选中的项由ItemIndex属性指定。ItemIndex是一个整型值,使用从0开始的下标来指定(也就是,第一个项的下标是0)。

要显示延列表中第5项为选中(在下面的示例代码中是“California”),指定它的ItemIndex如下:

  1. procedure TForm27.FormCreate(Sender: TObject);  
  2. begin  
  3.   ComboBox1.Items.Add('Alabama');  
  4.   ComboBox1.Items.Add('Alaska');  
  5.   ComboBox1.Items.Add('Arizona');  
  6.   ComboBox1.Items.Add('Arkansas');  
  7.   ComboBox1.Items.Add('California');  
  8.   // Other states can be listed here   
  9.    
  10.   // Index of 5th item is "4"   
  11.   ComboBox1.ItemIndex := 4;  
  12. end;  
  13.   
  14.    

 

如果不知道下标值,你也可以使用IndexOf方法来找到这个值,如下:

 

  1. procedure TForm27.FormCreate(Sender: TObject);  
  2. begin  
  3.   ComboBox1.Items.Add('Alabama');  
  4.   ComboBox1.Items.Add('Alaska');  
  5.   ComboBox1.Items.Add('Arizona');  
  6.   ComboBox1.Items.Add('Arkansas');  
  7.   ComboBox1.Items.Add('California');  
  8.   // Other states can be listed here   
  9.    
  10.   ComboBox1.ItemIndex := ComboBox1.Items.IndexOf('California');  
  11. end;  
  12.   
  13.    
  14.   
  15.    


 

 

实现用户选择的事件处理过程

 

在用户选择完某一项之后,OnChange事件会被触发,你可以为OnChange事件实现事件处理过程。

要实现OnChange的事件处理过程:

1.        选择TcomboBox组件。

2.        Object Inspector中,打开Events页,然后双击OnClick事件旁边的空白处。

3.        然后会自动打开Code Editor,编写如下代码:

 

  1.    
  2. procedure TForm27.CalendarEdit1Change(Sender: TObject);  
  3. begin  
  4.   ShowMessage(Format('Item %s at Index %d was selected. ',  
  5.     [ComboBox1.Selected.Text, ComboBox1.ItemIndex]));  
  6. end;  
  7.   
  8.    

 

这个事件处理过程显示一个对话框来提示选中的项。

Format函数根据一个格式字符串以及参数数组来返回一个格式化的字符串。

 

 

 

 

 

 

 

 

 

翻译的不好,请大家贱谅!

iOS 下拉选择 comboBox

最近要做一个下拉选择的控件,搜索到网上对这类控件有个总称:comboBox 刚好看到一个简单的Demo非常适合我的需求,就自己也试着做了一个。 效果如下: 这个下拉选择控...
  • lovechris00
  • lovechris00
  • 2016年03月10日 19:19
  • 4954

Delphi for iOS开发指南(6):在iOS应用程序中使用ComboBox组件来从列表中选择某一项

Delphi for iOS开发指南(6):在iOS应用程序中使用ComboBox组件来从列表中选择某一项       在FireMonkey iOS应用程序中实现一个选择器   在iOS...
  • DelphiTeacher
  • DelphiTeacher
  • 2013年05月14日 10:19
  • 2843

iOS自定义ComboBox

  • 2012年11月07日 11:32
  • 69KB
  • 下载

iOS实现的下拉框

  • 2015年04月14日 11:33
  • 161KB
  • 下载

如想给一个easyui的combobox组件在获取json数据之前添加数据

如想给一个easyui的combobox组件在获取json数据之前添加数据,使用如下的方法 添加如下代码: var array={}; array.keyvalue=-1; array...
  • gaoshang
  • gaoshang
  • 2016年07月20日 18:55
  • 1453

Delphi for iOS开发指南(2):在Windows PC上配置你的开发环境

在这篇教程开始之前,你应该阅读并按教程里的步骤执行: “Delphi for iOS开发指南(1):在Mac上配置你的开发环境”   为iOS目标平台开发的FireMonkey应用程序最初可以在...
  • wei_wu49036233
  • wei_wu49036233
  • 2013年09月03日 09:09
  • 3009

【IOS功能实现】之:下拉列表

通过网上资料,自己借助资料写的代码,这是完全代码 //****************************************************************...
  • xuqiang918
  • xuqiang918
  • 2013年11月07日 15:20
  • 5936

IOS下拉框实现

  • 2015年08月07日 23:40
  • 170KB
  • 下载

Delphi for iOS开发指南(7):在iOS应用程序中使用WebBrowser组件

在FireMonkey iOS应用程序中使用WebBrowser   在iOS平台上,FireMonkey使用TWebBrowser组件来封装Web Browser。这篇文单讲述了如何在iOS上创...
  • wei_wu49036233
  • wei_wu49036233
  • 2013年09月03日 09:15
  • 2035

Delphi for iOS开发指南(7):在iOS应用程序中使用WebBrowser组件

Delphi for iOS开发指南(7):在iOS应用程序中使用WebBrowser组件         在FireMonkey iOS应用程序中使用WebBrowser   在iOS...
  • DelphiTeacher
  • DelphiTeacher
  • 2013年05月14日 12:41
  • 4355
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Delphi for iOS开发指南(6):在iOS应用程序中使用ComboBox组件来从列表中选择某一项
举报原因:
原因补充:

(最多只允许输入30个字)