各位大哥帮帮忙,我刚学DELPHI不久不会在LISTVIEW中加入SubItems,谢谢了,在线。 在LISTVIEW中加入SubItems,怎么加呀 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 右銉单击点ITEM EDITOR出现对话框点NEW ITEM增加一项选 中新橧的项再点NEW SUBITEM 如果是固定的直接在listview里的item属性里添加,动态的要写代码 with ListView1.Items.Add dobegin Caption := Item1; SubItems.Add('aaa'); SubItems.Add('bbb');end;100分呀都给我吧 ListViwe的ViewStyle设置为:vsReportvar MyItem:TlistItem;begin Listview1.Clear; MyItem:=Listview1.Items.Add; MyItem.Caption:='信息'; MyItem.SubItems.Add('子项1'); MyItem.SubItems.Add('子项2');end; 我想你是问动态添加var vParent: TTreeNode;vParent := TreeView1.Selected; //当然你也可以选择其他的结点TreeView1.Items.AddChild(vParent, '子结点'); 关于delphi下操作EXCEL表格的问题 关于button得一个小问题。。。。 我是DELPHI新手,我的登录代码总是出问题,请各前辈门给我提示我哪里出错了! sql数据库中日期型数据显示问题 一小段 C 代碼轉 Delphi ,請幫忙... 关于TTable.Locate() 有关COM组件问题 怎样把memo组件中其中一行内容符给edit1.text 如何在DBgrideh里的特定单元格添加一个图片!! 怎么让状态栏显示提示?? 如何使adotable中的数据按照某个字段排序呢? ■□■□■一个调查(100分):关于企业的B/S系统■□■□■
出现对话框
点NEW ITEM
增加一项选 中新橧的项再点NEW SUBITEM
begin
Caption := Item1;
SubItems.Add('aaa');
SubItems.Add('bbb');
end;100分呀都给我吧
begin
Listview1.Clear;
MyItem:=Listview1.Items.Add;
MyItem.Caption:='信息';
MyItem.SubItems.Add('子项1');
MyItem.SubItems.Add('子项2');
end;
var
vParent: TTreeNode;
vParent := TreeView1.Selected; //当然你也可以选择其他的结点
TreeView1.Items.AddChild(vParent, '子结点');