dim my_childs# (128) for buf# = 1 to CountChildren( entity ) my_childs#(buf) = GetChild(entity,buf) next