请问怎么增大treeview的行间距，想用在触摸屏上。

Question

我的程序中用了treeview, 现在要改为在触摸屏上使用，treeview的默认行距太小，手指头能压着好几行，请问有无办法增加treeview节点间的行间距？

Answer 1

高手来解决一下,这个问题我也碰到了,客户总觉得行间距太小,郁闷ing...

Answer 2

Option ExplicitPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const TV_FIRST = &H1100
Private Const TVM_SETITEMHEIGHT = TV_FIRST + 27Function TreeView_SetItemHeight(ByVal hTVWnd As Long, ByVal lHeight As Long) As Long
    TreeView_SetItemHeight = SendMessage(hTVWnd, TVM_SETITEMHEIGHT, lHeight, ByVal 0)
End Function
Private Sub Command1_Click()
    Call TreeView_SetItemHeight(TreeView1.hwnd, 100)
End Sub

Answer 3

加个大号图标，行间距就大了还是supergreenbean(超级绿豆 - 天气酷热,把我煮了熬汤吧) 的专业～～