В этот раз я запал на новый элемент - TreeView
Кто-нибудь знает, как в нём увеличить расстояние между элементами и сделать первоначальный отступ от верхнего края?
'' Module
Private Const TV_FIRST = &H1100
Private Const TVM_SETITEMHEIGHT = (TV_FIRST + 27)
Public Sub setItemHeight(ByVal wnd As Long, ByVal height As Long)
SendMessage wnd, TVM_SETITEMHEIGHT, height, 0
End Sub
'' Form
Private Sub Form_Load()
setItemHeight Tree1.hwnd, 22
End Sub
hohol_kz писал(а):А вот корень лепится к самому краю контрола. Красивее было бы и этот отступ увеличить малость.
Ennor писал(а):hohol_kz писал(а):А вот корень лепится к самому краю контрола. Красивее было бы и этот отступ увеличить малость.
Не исключено, что тебя немного утешит свойство LineStyle.
Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 210