Delphi XE5 Android：如何让每个listview项都有自己的模板？

概述有没有办法让Delphi的TListView像android中的实际ListView一样？ 例如,列表中的每个项目都有自己的“视图”,在该视图中可以是多个其他视图(组件),如多个文本框和复选框,以及……？ 是的,有办法.我是通过使用这两种方法来实现的. CreateItem方法是将所需组件放在listitem中的位置. procedure TForm1.CreateItem;varedit1: 有没有办法让Delphi的TListVIEw像androID中的实际ListVIEw一样？
例如,列表中的每个项目都有自己的“视图”,在该视图中可以是多个其他视图(组件),如多个文本框和复选框,以及……？解决方法 是的,有办法.我是通过使用这两种方法来实现的. CreateItem方法是将所需组件放在Listitem中的位置.

procedure TForm1.CreateItem;varedit1:TClearingEdit;editCalendar1:TCustomCalendarEdit;begin  edit1:= TClearingEdit.Create(Self);  edit1.Parent := fItem;  edit1.Align := TAlignLayout.alClIEnt;  edit1.Text := 'Blabla';  edit1.OnChange := actEdit1OnChange;  editCalendar1 := TCalendarEdit.Create(Self);  editCalendar1.Parent := fItem;  editCalendar1.Align := TAlignLayout.alRight;  editCalendar1.WIDth := 90;  editCalendar1.Date := Date;  editCalendar1.OnChange := actEditCalOnChange;end;procedure TForm1.CreateListItem;begin  fItem:= TListBoxItem.Create(your_ListBox);  fItem.Parent := your_ListBox; //Here you put the ListBox as a parent  fItem.Align := TAlignLayout.altop;  fItem.Text := '';  fItem.Height := 50;  CreateItem;end;

要将自定义项添加到列表,只需调用CreateListItem方法！接下来我使用OnChange方法接收数据这里是一个例子：

procedure TForm1.actEditCalOnChange(Sender: TObject);begin  label1.text := TCalendarEdit(Sender).Text;end;procedure TForm1.actEdit1OnChange(Sender: TObject);begin  label2.text := TClearingEdit(Sender).Text;end;

总结

以上是内存溢出为你收集整理的Delphi XE5 Android：如何让每个listview项都有自己的模板？全部内容，希望文章能够帮你解决Delphi XE5 Android：如何让每个listview项都有自己的模板？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。