var
Item1: TListViewItem;
begin
Item1 :=
ListView1.Items.Add;
Item1.Purpose:=TListItemPurpose.Header;
//
Item1.Purpose:=TListItemPurpose.Footer;
Item1.text:=‘ xxxx‘;//Header或Footer显示的内容
end;
delphi xe6 android ListView增加 Header或Footer 的方法,布布扣,bubuko.com