[Simbar]

For i:=0 to TreeView1.SelectionCount-1 do
ListBox1.Items.Add(inttostr(TreeView1.Selections[i].Index));