Delphi - treeview

Me. pasa .algo .raro .con .el. treeview, necesito. expander .todos. los .nodos .dentro. de nodos .padres,. lo .haog .asi:
if TVWporcentajes.Items[0].Selected then
TVWporcentajes.Items[0].Expand(true);
pero .al .querer .expandir. otro .nodo .padre:
if TVWporcentajes.Items[1].Selected then
TVWporcentajes.Items[1].Expand(true);
no. lo. hace,. esta. es .la .forma. correcta???

Bueno, .en. realidad no .era .gran .cosa, .lo .solucione. encontrando. y .poniendo .el .absoluteindex. de. cada .nodo. padre.