Public Sub RemoveAt(Index As Int)
If GetSize <= 1 Then
Clear
Return
End If
Dim removePanel, p As Panel
removePanel = panels.Get(Index)
For i = Index + 1 To items.Size - 1
p = panels.Get(i)
p.Tag = i - 1
Dim NewTop As Int = p.Top - heights.Get(Index) - dividerHeight
p.top = NewTop
Next
sv.Panel.Height = sv.Panel.Height - heights.Get(Index) - dividerHeight
items.RemoveAt(Index)
panels.RemoveAt(Index)
heights.RemoveAt(Index)
removePanel.RemoveView
End Sub