thanks

you mean like this :

procedure tmainfo.on_create(const sender: TObject);
var
  item : ttreelistedititem;
begin
  item :=  ttreelistedititem.create;
  item.caption := 'root';

  ttreeitemedit1.itemlist.add(item);
end;

how to add a child to root item ?

------------------------------------------------------------------------------
_______________________________________________
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Reply via email to