VC知识库文章 - VC控件 TreeCtrl 与 ListCtrl 演示

VC控件 TreeCtrl 与 ListCtrl 演示


作者：兰州大学现物系

这个例子类似于 Windows 的资源管理器,程序运行界面如图一所示：


图一

主要用到的类有：
CListCtrl,CTreeCtrl,CImageList,CFileFind 和函数SHGetFileInfo()

简述步骤如下：
1、增加 TreeCtrl 的 TVS_HASBUTTONS，TVS_HASLINES、TVS_LINESATROOT Style，代码如下：

    DWORD dwStyle = GetWindowLong(m_tree.m_hWnd,GWL_STYLE);
    dwStyle |= TVS_HASBUTTONS | TVS_HASLINES | TVS_LINESATROOT;
    SetWindowLong(m_tree.m_hWnd,GWL_STYLE,dwStyle);

2、为TreeCtrl添加Root项：

     m_hRoot = m_tree.InsertItem("我的电脑");
     InsertItem()的函数原形为
     HTREEITEM InsertItem( LPCTSTR lpszItem, HTREEITEM hParent = TVI_ROOT, 
     HTREEITEM hInsertAfter = TVI_LAST );
     

3、获取本地逻辑驱动器,并添加：

    void CTreeViewDlg::GetLogicalDrives(HTREEITEM hParent)
    {
         size_t szAllDriveStrings = GetLogicalDriveStrings(0,NULL);
	char *pDriveStrings = new char[szAllDriveStrings + sizeof(_T(""))];
	GetLogicalDriveStrings(szAllDriveStrings,pDriveStrings);
	size_t szDriveString = strlen(pDriveStrings);
	while(szDriveString > 0)
	{
		m_tree.InsertItem(pDriveStrings,hParent);
		pDriveStrings += szDriveString + 1;
		szDriveString = strlen(pDriveStrings);
	}
    }
      

4、添加TVN_EXPANDED消息处理函数,当一项展开时,为其子项添加下一级目录：

    void CTreeViewDlg::OnItemexpandedTree(NMHDR* pNMHDR, LRESULT* pResult) 
    {
	NM_TREEVIEW* pNMTreeView = (NM_TREEVIEW*)pNMHDR;
	// TODO: Add your control notification handler code here
	TVITEM item = pNMTreeView->itemNew;
	if(item.hItem == m_hRoot)
	return;
        HTREEITEM hChild = m_tree.GetChildItem(item.hItem);
	while(hChild)
	{
		AddSubDir(hChild);
		hChild = m_tree.GetNextItem(hChild,TVGN_NEXT);
	}
	*pResult = 0;
    }  

AddSubDir函数功能添加子项,具体代码见示例。

5、添加TVN_SELCHANGED消息处理函数,在这个函数里,用GetFullPath()取得选中项的绝 路径(GetFullPath()具体代码看示例),在ListCtrl中添加文件而非文件夹的图标：

    void CTreeViewDlg::OnSelchangedTree(NMHDR* pNMHDR, LRESULT* pResult) 
    {
	m_list.DeleteAllItems();
	NM_TREEVIEW* pNMTreeView = (NM_TREEVIEW*)pNMHDR;
	TVITEM item = pNMTreeView->itemNew;
	if(item.hItem == m_hRoot)
	return;
	CString str = GetFullPath(item.hItem);
        if(str.Right(1) != "\\")
	   str += "\\";
	str += "*.*";
	CFileFind file;
	BOOL bContinue = file.FindFile(str);
	while(bContinue)
	{
		bContinue = file.FindNextFile();
		if(!file.IsDirectory() && !file.IsDots())
		{
    			SHFILEINFO info;
			CString temp = str;
			int index = temp.Find("*.*");
			temp.Delete(index,3);
    			SHGetFileInfo(temp + file.GetFileName(),
    			0,
    			&info,sizeof(&info),
    			SHGFI_DISPLAYNAME | SHGFI_ICON);
    			int i = m_ImageList.Add(info.hIcon);
    			m_list.InsertItem(i,info.szDisplayName,i);
		}
	}
	*pResult = 0;
    }    

    这只是一个简单的例子,你可以在 ListCtrl 中添加鼠标双击消息的处理函数,用 Process 打开该选中的文件; 该示例在VC6,xp下编译通过。
    VC初学者,如有不足之处,请来信指教([e-mail])。
--------------------next---------------------

在OnItemexpandedTree中
if(item.hItem == m_hRoot)
   return;
有什么作用，好像注释掉以后也没什么影响 ( westangel 发表于 2008-7-14 11:06:00)
 
m_ImageList只是Add，没有删除操作，这样会出事的；） ( kongwe 发表于 2006-12-26 9:24:00)
 
可以用 ItemHasChildren 做判断 ( kolin_05 发表于 2006-12-20 17:44:00)
 
是的，递归是没用的，因为你后来使用的是相对路径，是找不到任何文件的。 ( sgch1982 发表于 2005-4-8 15:32:00)
 
这个问题已经解决，可以在添加下一级目录的时候作判断，是否已经添加了下一级目录，可以避免重复的添加下一级目录出现bug! ( accpwww 发表于 2004-3-31 9:17:00)
 
有bug，当多次点击同一项，触发OnItemexpandedTree事件，为其子项添加下一级目录时，会多次为其子项添加下一级目录。 ( accpwww 发表于 2004-3-30 17:12:00)
 
不错，但在GetDriveDir(HTREEITEM hParent)中的递归是多余的，这个递归其实什么都没有做；另外，在展开事件函数OnItemexpandedTree中如果改成用m_tree.GetSelectedItem()来获得展开点可以不？我试了一下好像有问题 ( dyjwxl 发表于 2003-11-27 11:27:00)
 
不错，但在GetDriveDir(HTREEITEM hParent)中的递归是多余的，这个递归其实什么都没有做；另外，在展开事件函数OnItemexpandedTree中如果改成用m_tree.GetSelectedItem()来获得展开点可以不？我试了一下好像有问题 ( dyjwxl 发表于 2003-11-27 11:26:00)
 
俺是兰州交通大学的，望日后多指教。 ( lixuebao 发表于 2003-11-10 21:31:00)
 
请问谁知道如何得到sys image list的指针啊，谢谢！ ( gww888 发表于 2003-10-6 12:40:00)
 
.......................................................

--------------------next---------------------