cxTreeList和cxListView使用

在cxTreeList中添加结点。

var aa,bb: TcxTreeListNode;
begin
  if cxTreeList1.Count >0 then
  begin
   bb:=cxTreeList1.Items[0];
  aa:=cxTreeList1.Insert(bb);
end
else
  aa:=cxTreeList1.Add;
aa.Values[0]:='aaa';
aa.Values[1]:='bbb';
aa.Values[2]:='ccc';

在cxListView中添加结点。

aa: Tlistitem;

  aa:= cxListView1.Items.Insert(0);
  aa.Caption :=SCarNumber;
  aa.SubItems.Add(SCarKind);
  aa.SubItems.Add(inttostr(jpginfo.nCarSpeed));
  aa.SubItems.Add(inttostr(LimitSpeed));
  aa.SubItems.Add(formatdatetime('yyyy-mm-dd hh:nn:ss',Now));

你可能感兴趣的:(Delphi)