delphi listview 分组 我用的delphi2010 用listview 做了列表 用的xml做数据库。以下是图片怎么才可以分组 就像QQ的分组那样 还要加上图标。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 listview要做成分组比较麻烦,可以换用其它列表控件,如Dev或Rz控件包中的 - - listview 不是有个groups 那个是什么。。 添加groups,然后添加item并可以设置item属于哪个group,然后ListView1.GroupView := True; uses CommCtrl;// 设置ListItem分组procedure SetListItemGroup(const AItem: TListItem; const AGroupID: Integer);var LvItemA: TLVITEMA;begin if Assigned(AItem) then begin ZeroMemory(@LvItemA, SizeOf(TLVITEMA)); with LvItemA do begin ZeroMemory(@LvItemA, SizeOf(TLvItemA)); mask := LVIF_GROUPID; iItem := AItem.Index; iGroupId := AGroupID; end; SendMessage(AItem.ListView.Handle, LVM_SETITEM, 0, Longint(@LvItemA)); end;end;// 设置ListView是否显示分组ListView_EnableGroupView(lvData.Handle, True); - - 给个示例源码吧 我的列表是读取xml的。晕了 用treeview设几个属性应该是你要效果,不用listview - - listview 没有办法吗? 求一条sql语句 INDY UDP如何维护客户端(客户端是GPRS模块) 以二进制方式打开文件,并以十六进制方式显示在richedit中的问题! 关于多线程的使用问题?急救! 怎样制作 调用 DLL 如果我的动态创建一个button,想把它的onclick写到一个公共的单元的里,怎么写呀? 100高分求Delphi 7.0 SP1 数学模型(线路设计问题)高手进 求救!在Windows2003Server上安装Delphi5运行报错 急!急!急!谁能马上告诉我!!!!!!!max? 请问如何用delphi读取JS中的window.external返回值 我是用xml读取到 combobox
// 设置ListItem分组
procedure SetListItemGroup(const AItem: TListItem;
const AGroupID: Integer);
var
LvItemA: TLVITEMA;
begin
if Assigned(AItem) then
begin
ZeroMemory(@LvItemA, SizeOf(TLVITEMA));
with LvItemA do
begin
ZeroMemory(@LvItemA, SizeOf(TLvItemA));
mask := LVIF_GROUPID;
iItem := AItem.Index;
iGroupId := AGroupID;
end;
SendMessage(AItem.ListView.Handle, LVM_SETITEM, 0, Longint(@LvItemA));
end;
end;// 设置ListView是否显示分组
ListView_EnableGroupView(lvData.Handle, True);