Source position: msedirtree.pas line 59
procedure tdirtreefo.treeitemoncreateitem(
const sender: tcustomitemlist;
var item: ttreelistedititem
); virtual;