VBA > Opis obiektów VBA > MxGrid > Opis interfejsów > Row > Właściwości > Indent

Drukuj

Indent – Row

Indent as Integer

Określa poziom (zagłębienie) elementu w hierarchicznej strukturze drzewa. Pole jest tylko do odczytu. Elementy najwyżej w hierarchii mają wartość Indent = 0, pierwszy poziom dzieci ma wartość 1 i tak dalej, aż do maksymalnie 32 poziomów zagłębienia.

 

Indent

 

AmCtrl1.TreeMode = ttSolidLines

AmCtrl1.ColumnCount = 1

AmCtrl1.Columns(0).amFieldType ftString, 100

AmCtrl1.RowCount = 4

AmCtrl1.Rows(1).Value(0) = "Indent = 0"

AmCtrl1.Rows(2).Value(0) = "Indent = 0"

AmCtrl1.Rows(3).Value(0) = "Indent = 0"

Set r = AmCtrl1.InsertChildRow(3, 0)

r.Value(0) = "Indent = 1"

Set r = AmCtrl1.Rows(0)

r.Value(0) = "Indent = 0"

Set r = AmCtrl1.InsertChildRow(0, –1)

r.Value(0) = "Indent = 1"

Set r = AmCtrl1.InsertChildRow(0, –1)

r.Value(0) = "Indent = 1"

Set r = AmCtrl1.InsertChildRow(0, –1)

r.Value(0) = "Indent = 1"

Set r = r.InsertChildRow(1)

r.Value(0) = "Indent = 2"

Set r = r.InsertChildRow(1)

r.Value(0) = "Indent = 3"

Set r = r.InsertChildRow(1)

r.Value(0) = "Indent = 4"

Set r = r.InsertChildRow(1)

r.Value(0) = "Indent = 5"