VBA > Opis obiektów VBA > MxGrid > Opis interfejsów > Row > Właściwości > Expanded | | Drukuj |
Expanded as RowExpanded
Umożliwia określenie lub ustawienie aktualnego stanu rozwinięcia struktury drzewa danego elementu. Określają to stałe:
reNone (-1) Wiersz nie ma elementów niższego poziomu (dzieci) oraz nie ma znacznika rozwijanego drzewa. Ta wartość nie może być ustawiona jeśli element posiada dzieci.
reCollapsed (0) Wiersz ma ukryte (zwinięte) elementy niższego poziomu. Ta wartość nie może być ustawiona, jeśli element nie posiada dzieci
ReExpanded (1) Wiersz ma odkryte (rozwinięte) elementy niższego poziomu. Ta wartość nie może być ustawiona, jeśli element nie posiada dzieci.
AmCtrl1.TreeMode = ttSolidLines
AmCtrl1.ColumnCount = 1
AmCtrl1.RowCount = 3
Set r = AmCtrl1.Rows(0)
r.InsertChildRow(0).Value(0) = "dziecko"
r.Value(0) = "Expanded = reExpanded"
r.Expanded = reExpanded
Set r = AmCtrl1.Rows(2)
r.InsertChildRow(0).Value(0) = "dziecko"
r.Value(0) = "Expanded = reCollapsed"
r.Expanded = reCollapsed
Set r = AmCtrl1.Rows(4)
r.Value(0) = "Expanded = reNone"