Public Enum TVMessages
TV_FIRST = &H1100
#If UNICODE Then
TVM_INSERTITEM = (TV_FIRST + 50)
#Else
TVM_INSERTITEM = (TV_FIRST + 0)
#End If
TVM_DELETEITEM = (TV_FIRST + 1)
TVM_EXPAND = (TV_FIRST + 2)
TVM_GETITEMRECT = (TV_FIRST + 4)
TVM_GETCOUNT = (TV_FIRST + 5)
TVM_GETINDENT = (TV_FIRST + 6)
TVM_SETINDENT = (TV_FIRST + 7)
TVM_GETIMAGELIST = (TV_FIRST + 8)
TVM_SETIMAGELIST = (TV_FIRST + 9)
TVM_GETNEXTITEM = (TV_FIRST + 10)
TVM_SELECTITEM = (TV_FIRST + 11)
#If UNICODE Then
TVM_GETITEM = (TV_FIRST + 62)
TVM_SETITEM = (TV_FIRST + 63)
TVM_EDITLABEL = (TV_FIRST + 65)
#Else
TVM_GETITEM = (TV_FIRST + 12)
TVM_SETITEM = (TV_FIRST + 13)
TVM_EDITLABEL = (TV_FIRST + 14)
#End If
TVM_GETEDITCONTROL = (TV_FIRST + 15)
TVM_GETVISIBLECOUNT = (TV_FIRST + 16)
TVM_HITTEST = (TV_FIRST + 17)
TVM_CREATEDRAGIMAGE = (TV_FIRST + 18)
TVM_SORTCHILDREN = (TV_FIRST + 19)
TVM_ENSUREVISIBLE = (TV_FIRST + 20)
TVM_SORTCHILDRENCB = (TV_FIRST + 21)
TVM_ENDEDITLABELNOW = (TV_FIRST + 22)
#If UNICODE Then
TVM_GETISEARCHSTRING = (TV_FIRST + 64)
#Else
TVM_GETISEARCHSTRING = (TV_FIRST + 23)
#End If
#If (Win32_IE >= &H300) Then
TVM_SETTOOLTIPS = (TV_FIRST + 24)
TVM_GETTOOLTIPS = (TV_FIRST + 25)
#End If ' 0x0300#If (Win32_IE >= &H400) Then
TVM_SETINSERTMARK = (TV_FIRST + 26)
TVM_SETUNICODEFORMAT = CCM_SETUNICODEFORMAT
TVM_GETUNICODEFORMAT = CCM_GETUNICODEFORMAT
TVM_SETITEMHEIGHT = (TV_FIRST + 27)
TVM_GETITEMHEIGHT = (TV_FIRST + 28)
TVM_SETBKCOLOR = (TV_FIRST + 29)
TVM_SETTEXTCOLOR = (TV_FIRST + 30)
TVM_GETBKCOLOR = (TV_FIRST + 31)
TVM_GETTEXTCOLOR = (TV_FIRST + 32)
TVM_SETSCROLLTIME = (TV_FIRST + 33)
TVM_GETSCROLLTIME = (TV_FIRST + 34)
TVM_SETINSERTMARKCOLOR = (TV_FIRST + 37)
TVM_GETINSERTMARKCOLOR = (TV_FIRST + 38)
#End If ' 0x0400End Enum ' TVMessages
Public Enum TVM_EXPAND_wParam
TVE_COLLAPSE = &H1
TVE_EXPAND = &H2
TVE_TOGGLE = &H3
#If (Win32_IE >= &H300) Then
TVE_EXPANDPARTIAL = &H4000
#End If
TVE_COLLAPSERESET = &H8000
End Enum
Public Enum TVM_GET_SETIMAGELIST_wParam
TVSIL_NORMAL = 0
TVSIL_STATE = 2
End Enum
Public Enum TVM_GETNEXTITEM_wParam
TVGN_ROOT = &H0
TVGN_NEXT = &H1
TVGN_PREVIOUS = &H2
TVGN_PARENT = &H3
TVGN_CHILD = &H4
TVGN_FIRSTVISIBLE = &H5
TVGN_NEXTVISIBLE = &H6
TVGN_PREVIOUSVISIBLE = &H7
TVGN_DROPHILITE = &H8
TVGN_CARET = &H9
#If (Win32_IE >= &H400) Then
TVGN_LASTVISIBLE = &HA
#End If
End EnumPublic Type TVHITTESTINFO ' was TV_HITTESTINFO
pt As POINTAPI
flags As TVHITTESTINFO_flags
hItem As Long
End Type
Public Enum TVHITTESTINFO_flags
TVHT_NOWHERE = &H1
TVHT_ONITEMICON = &H2
TVHT_ONITEMLABEL = &H4
TVHT_ONITEMINDENT = &H8
TVHT_ONITEMBUTTON = &H10
TVHT_ONITEMRIGHT = &H20
TVHT_ONITEMSTATEICON = &H40
TVHT_ONITEM = (TVHT_ONITEMICON Or TVHT_ONITEMLABEL Or TVHT_ONITEMSTATEICON)
TVHT_ABOVE = &H100
TVHT_BELOW = &H200
TVHT_TORIGHT = &H400
TVHT_TOLEFT = &H800
End Enum'typedef int (CALLBACK *PFNTVCOMPARE)(LPARAM lParam1, LPARAM lParam2, LPARAM lParamSort);Public Type TVSORTCB ' was TV_SORTCB
hParent As Long
lpfnCompare As Long
lParam As Long
End Type' ================================================================
' Treeview notificationsPublic Enum TVNotifications
TVN_FIRST = -400& ' &HFFFFFE70 ' (0U-400U)
TVN_LAST = -499& ' &HFFFFFE0D ' (0U-499U)
#If UNICODE Then
TVN_SELCHANGING = (TVN_FIRST - 50)
TVN_SELCHANGED = (TVN_FIRST - 51)
TVN_GETDISPINFO = (TVN_FIRST - 52)
TVN_SETDISPINFO = (TVN_FIRST - 53)
TVN_ITEMEXPANDING = (TVN_FIRST - 54)
TVN_ITEMEXPANDED = (TVN_FIRST - 55)
TVN_BEGINDRAG = (TVN_FIRST - 56)
TVN_BEGINRDRAG = (TVN_FIRST - 57)
TVN_DELETEITEM = (TVN_FIRST - 58)
TVN_BEGINLABELEDIT = (TVN_FIRST - 59)
TVN_ENDLABELEDIT = (TVN_FIRST - 60)
#If (Win32_IE >= &H400) Then
TVN_GETINFOTIPW = (TVN_FIRST - 14)
#End If ' 0x400
#Else ' lParam points to:
TVN_SELCHANGING = (TVN_FIRST - 1) ' NMTREEVIEW
TVN_SELCHANGED = (TVN_FIRST - 2) ' NMTREEVIEW
TVN_GETDISPINFO = (TVN_FIRST - 3) ' NMTVDISPINFO
TVN_SETDISPINFO = (TVN_FIRST - 4) ' NMTVDISPINFO
TVN_ITEMEXPANDING = (TVN_FIRST - 5) ' NMTREEVIEW
TVN_ITEMEXPANDED = (TVN_FIRST - 6) ' NMTREEVIEW
TVN_BEGINDRAG = (TVN_FIRST - 7) ' NMTREEVIEW
TVN_BEGINRDRAG = (TVN_FIRST - 8) ' NMTREEVIEW
TVN_DELETEITEM = (TVN_FIRST - 9) ' NMTREEVIEW
TVN_BEGINLABELEDIT = (TVN_FIRST - 10) ' NMTVDISPINFO
TVN_ENDLABELEDIT = (TVN_FIRST - 11) ' NMTVDISPINFO
#If (Win32_IE >= &H400) Then
TVN_GETINFOTIP = (TVN_FIRST - 13)
#End If ' 0x400
#End If ' UNICODE
TVN_KEYDOWN = (TVN_FIRST - 12) ' NMTVKEYDOWN
#If (Win32_IE >= &H400) Then
TVN_SINGLEEXPAND = (TVN_FIRST - 15)
#End If ' 0x400
End Enum ' Notifications' 1st member of all notification structs is a NMHDRPublic Type NMTREEVIEW ' was NM_TREEVIEW
hdr As NMHDR
' Specifies a notification-specific action flag.
' Is NMTREEVIEW_action for TVN_SELCHANGING, TVN_SELCHANGED, TVN_SETDISPINFO
' Is TVM_EXPAND_wParam for TVN_ITEMEXPANDING, TVN_ITEMEXPANDED
action As Long
itemOld As TVITEM
itemNew As TVITEM
ptDrag As POINTAPI
End Type' for TVN_SELCHANGING, TVN_SELCHANGED, TVN_SETDISPINFO
Public Enum NMTREEVIEW_action
TVC_UNKNOWN = &H0
TVC_BYMOUSE = &H1
TVC_BYKEYBOARD = &H2
End EnumPublic Type NMTVDISPINFO ' was TV_DISPINFO
hdr As NMHDR
item As TVITEM
End TypePublic Type NMTVKEYDOWN ' was TV_KEYDOWN
hdr As NMHDR
wVKey As Integer
flags As Long ' Always zero.
End Type#If (Win32_IE >= &H400) Then' for tooltips
Public Type NMTVGETINFOTIP
hdr As NMHDR
pszText As Long
cchTextMax As Long
hItem As Long
lParam As Long
End Type' treeview's customdraw return meaning don't draw images.
' valid on CDRF_NOTIFYITEMPREPAINT
Public Const TVCDRF_NOIMAGES = &H10000
'
#End If ' WIN32_IE >= &H400
'' Prepares the index of a state image so that a tree view control or list
' view control can use the index to retrieve the state image for an item.
' Returns the one-based index of the state image shifted left twelve bits.
' A common control utility macro.Public Function INDEXTOSTATEIMAGEMASK(iState As Long) As Long
' #define INDEXTOSTATEIMAGEMASK(i) ((i) << 12)
INDEXTOSTATEIMAGEMASK = iState * (2 ^ 12)
End Function
TV_FIRST = &H1100
#If UNICODE Then
TVM_INSERTITEM = (TV_FIRST + 50)
#Else
TVM_INSERTITEM = (TV_FIRST + 0)
#End If
TVM_DELETEITEM = (TV_FIRST + 1)
TVM_EXPAND = (TV_FIRST + 2)
TVM_GETITEMRECT = (TV_FIRST + 4)
TVM_GETCOUNT = (TV_FIRST + 5)
TVM_GETINDENT = (TV_FIRST + 6)
TVM_SETINDENT = (TV_FIRST + 7)
TVM_GETIMAGELIST = (TV_FIRST + 8)
TVM_SETIMAGELIST = (TV_FIRST + 9)
TVM_GETNEXTITEM = (TV_FIRST + 10)
TVM_SELECTITEM = (TV_FIRST + 11)
#If UNICODE Then
TVM_GETITEM = (TV_FIRST + 62)
TVM_SETITEM = (TV_FIRST + 63)
TVM_EDITLABEL = (TV_FIRST + 65)
#Else
TVM_GETITEM = (TV_FIRST + 12)
TVM_SETITEM = (TV_FIRST + 13)
TVM_EDITLABEL = (TV_FIRST + 14)
#End If
TVM_GETEDITCONTROL = (TV_FIRST + 15)
TVM_GETVISIBLECOUNT = (TV_FIRST + 16)
TVM_HITTEST = (TV_FIRST + 17)
TVM_CREATEDRAGIMAGE = (TV_FIRST + 18)
TVM_SORTCHILDREN = (TV_FIRST + 19)
TVM_ENSUREVISIBLE = (TV_FIRST + 20)
TVM_SORTCHILDRENCB = (TV_FIRST + 21)
TVM_ENDEDITLABELNOW = (TV_FIRST + 22)
#If UNICODE Then
TVM_GETISEARCHSTRING = (TV_FIRST + 64)
#Else
TVM_GETISEARCHSTRING = (TV_FIRST + 23)
#End If
#If (Win32_IE >= &H300) Then
TVM_SETTOOLTIPS = (TV_FIRST + 24)
TVM_GETTOOLTIPS = (TV_FIRST + 25)
#End If ' 0x0300#If (Win32_IE >= &H400) Then
TVM_SETINSERTMARK = (TV_FIRST + 26)
TVM_SETUNICODEFORMAT = CCM_SETUNICODEFORMAT
TVM_GETUNICODEFORMAT = CCM_GETUNICODEFORMAT
TVM_SETITEMHEIGHT = (TV_FIRST + 27)
TVM_GETITEMHEIGHT = (TV_FIRST + 28)
TVM_SETBKCOLOR = (TV_FIRST + 29)
TVM_SETTEXTCOLOR = (TV_FIRST + 30)
TVM_GETBKCOLOR = (TV_FIRST + 31)
TVM_GETTEXTCOLOR = (TV_FIRST + 32)
TVM_SETSCROLLTIME = (TV_FIRST + 33)
TVM_GETSCROLLTIME = (TV_FIRST + 34)
TVM_SETINSERTMARKCOLOR = (TV_FIRST + 37)
TVM_GETINSERTMARKCOLOR = (TV_FIRST + 38)
#End If ' 0x0400End Enum ' TVMessages
Public Enum TVM_EXPAND_wParam
TVE_COLLAPSE = &H1
TVE_EXPAND = &H2
TVE_TOGGLE = &H3
#If (Win32_IE >= &H300) Then
TVE_EXPANDPARTIAL = &H4000
#End If
TVE_COLLAPSERESET = &H8000
End Enum
Public Enum TVM_GET_SETIMAGELIST_wParam
TVSIL_NORMAL = 0
TVSIL_STATE = 2
End Enum
Public Enum TVM_GETNEXTITEM_wParam
TVGN_ROOT = &H0
TVGN_NEXT = &H1
TVGN_PREVIOUS = &H2
TVGN_PARENT = &H3
TVGN_CHILD = &H4
TVGN_FIRSTVISIBLE = &H5
TVGN_NEXTVISIBLE = &H6
TVGN_PREVIOUSVISIBLE = &H7
TVGN_DROPHILITE = &H8
TVGN_CARET = &H9
#If (Win32_IE >= &H400) Then
TVGN_LASTVISIBLE = &HA
#End If
End EnumPublic Type TVHITTESTINFO ' was TV_HITTESTINFO
pt As POINTAPI
flags As TVHITTESTINFO_flags
hItem As Long
End Type
Public Enum TVHITTESTINFO_flags
TVHT_NOWHERE = &H1
TVHT_ONITEMICON = &H2
TVHT_ONITEMLABEL = &H4
TVHT_ONITEMINDENT = &H8
TVHT_ONITEMBUTTON = &H10
TVHT_ONITEMRIGHT = &H20
TVHT_ONITEMSTATEICON = &H40
TVHT_ONITEM = (TVHT_ONITEMICON Or TVHT_ONITEMLABEL Or TVHT_ONITEMSTATEICON)
TVHT_ABOVE = &H100
TVHT_BELOW = &H200
TVHT_TORIGHT = &H400
TVHT_TOLEFT = &H800
End Enum'typedef int (CALLBACK *PFNTVCOMPARE)(LPARAM lParam1, LPARAM lParam2, LPARAM lParamSort);Public Type TVSORTCB ' was TV_SORTCB
hParent As Long
lpfnCompare As Long
lParam As Long
End Type' ================================================================
' Treeview notificationsPublic Enum TVNotifications
TVN_FIRST = -400& ' &HFFFFFE70 ' (0U-400U)
TVN_LAST = -499& ' &HFFFFFE0D ' (0U-499U)
#If UNICODE Then
TVN_SELCHANGING = (TVN_FIRST - 50)
TVN_SELCHANGED = (TVN_FIRST - 51)
TVN_GETDISPINFO = (TVN_FIRST - 52)
TVN_SETDISPINFO = (TVN_FIRST - 53)
TVN_ITEMEXPANDING = (TVN_FIRST - 54)
TVN_ITEMEXPANDED = (TVN_FIRST - 55)
TVN_BEGINDRAG = (TVN_FIRST - 56)
TVN_BEGINRDRAG = (TVN_FIRST - 57)
TVN_DELETEITEM = (TVN_FIRST - 58)
TVN_BEGINLABELEDIT = (TVN_FIRST - 59)
TVN_ENDLABELEDIT = (TVN_FIRST - 60)
#If (Win32_IE >= &H400) Then
TVN_GETINFOTIPW = (TVN_FIRST - 14)
#End If ' 0x400
#Else ' lParam points to:
TVN_SELCHANGING = (TVN_FIRST - 1) ' NMTREEVIEW
TVN_SELCHANGED = (TVN_FIRST - 2) ' NMTREEVIEW
TVN_GETDISPINFO = (TVN_FIRST - 3) ' NMTVDISPINFO
TVN_SETDISPINFO = (TVN_FIRST - 4) ' NMTVDISPINFO
TVN_ITEMEXPANDING = (TVN_FIRST - 5) ' NMTREEVIEW
TVN_ITEMEXPANDED = (TVN_FIRST - 6) ' NMTREEVIEW
TVN_BEGINDRAG = (TVN_FIRST - 7) ' NMTREEVIEW
TVN_BEGINRDRAG = (TVN_FIRST - 8) ' NMTREEVIEW
TVN_DELETEITEM = (TVN_FIRST - 9) ' NMTREEVIEW
TVN_BEGINLABELEDIT = (TVN_FIRST - 10) ' NMTVDISPINFO
TVN_ENDLABELEDIT = (TVN_FIRST - 11) ' NMTVDISPINFO
#If (Win32_IE >= &H400) Then
TVN_GETINFOTIP = (TVN_FIRST - 13)
#End If ' 0x400
#End If ' UNICODE
TVN_KEYDOWN = (TVN_FIRST - 12) ' NMTVKEYDOWN
#If (Win32_IE >= &H400) Then
TVN_SINGLEEXPAND = (TVN_FIRST - 15)
#End If ' 0x400
End Enum ' Notifications' 1st member of all notification structs is a NMHDRPublic Type NMTREEVIEW ' was NM_TREEVIEW
hdr As NMHDR
' Specifies a notification-specific action flag.
' Is NMTREEVIEW_action for TVN_SELCHANGING, TVN_SELCHANGED, TVN_SETDISPINFO
' Is TVM_EXPAND_wParam for TVN_ITEMEXPANDING, TVN_ITEMEXPANDED
action As Long
itemOld As TVITEM
itemNew As TVITEM
ptDrag As POINTAPI
End Type' for TVN_SELCHANGING, TVN_SELCHANGED, TVN_SETDISPINFO
Public Enum NMTREEVIEW_action
TVC_UNKNOWN = &H0
TVC_BYMOUSE = &H1
TVC_BYKEYBOARD = &H2
End EnumPublic Type NMTVDISPINFO ' was TV_DISPINFO
hdr As NMHDR
item As TVITEM
End TypePublic Type NMTVKEYDOWN ' was TV_KEYDOWN
hdr As NMHDR
wVKey As Integer
flags As Long ' Always zero.
End Type#If (Win32_IE >= &H400) Then' for tooltips
Public Type NMTVGETINFOTIP
hdr As NMHDR
pszText As Long
cchTextMax As Long
hItem As Long
lParam As Long
End Type' treeview's customdraw return meaning don't draw images.
' valid on CDRF_NOTIFYITEMPREPAINT
Public Const TVCDRF_NOIMAGES = &H10000
'
#End If ' WIN32_IE >= &H400
'' Prepares the index of a state image so that a tree view control or list
' view control can use the index to retrieve the state image for an item.
' Returns the one-based index of the state image shifted left twelve bits.
' A common control utility macro.Public Function INDEXTOSTATEIMAGEMASK(iState As Long) As Long
' #define INDEXTOSTATEIMAGEMASK(i) ((i) << 12)
INDEXTOSTATEIMAGEMASK = iState * (2 ^ 12)
End Function
解决方案 »
- ASP转vb遇到的问题
- 一个动态链接库,知道它的具体作用,如果写的人不提供用法,能否通过什么工具查看得出来
- ◎◎◎◎◎◎◎◎CSDN专用FTP已经启动,敬请关注和帮助!
- 怎么样控制打印机的纸往回退2行啊?
- 请问VB中有什么控件可以获取中英问混合字符串的长度
- 那有医药管理系统
- 同时打开两个数据库,将数据库甲中的数据(记录)倒入数据库已中,在vb中能用程序来实现吗?
- 怎么让vb6.0里的按钮控件透明(只显示其caption),在线等待!
- 通过串口怎么发送短信。我找个代码。问题是有的手机卡不能发送,有的手机卡就能发送。问题很怪。请大家指点下
- 请各路英雄帮在下一个忙
- 如何控制VCD用哪个声道播放
- 在VB60中调用Excel97,为什么Quit后在任务栏中还有Excel?
Listview的API全集(1)-----http://www.csdn.net/expert/topic/640/640091.xml?temp=.8425867
Listview的API全集(2)-----http://www.csdn.net/expert/topic/640/640101.xml?temp=.6100885
Treeview的API全集(1)-----http://www.csdn.net/expert/topic/640/640108.xml?temp=.347912
Treeview的API全集(2)-----http://www.csdn.net/expert/topic/640/640109.xml?temp=.3793146
代码名称 有背景图片的Treeview
代码类型 图形图像
运行环境 Win9x/WinNT/Win2000/WinME
授权方式 共享软件
代码大小 13K
代码评价
上传时间 2001-12-14
相关链接 主页
本日下载 1 本周:21 总计:21
下载地址1 下载
代码简介 有背景图片的Treeview.
其实也没算贴错
这本来就是说TreeView的!