想设计一个播放视频的表单，视频分门别类的放置在一个文件夹下面。例如：D:\VIDEO文件夹，下面有小学数学,初中数学两个文件夹，而小学文件夹下面有1年级文件夹，2年级文件夹，……，然后每个文件夹下面都有视频文件，而初中文件夹下面有7年级文件夹，8年级文件夹，9年级文件夹，而每个文件夹下面又有上学期和下学期两个文件夹，然后是具体的视频文件。想设计的表单效果：左边上方是一个树形控件（类似于GETDIR但要嵌入到表单中），下方是一个视频文件列表表格，右侧是播放界面（采用了WINDOWS MEDIA PLAYER控件）。
操作过程：在左上方的文件目录树中进行定位，当定位到一个包含视频的文件夹时，下方表格中应该列示出该文件夹中的所有文件，然后在该表格中点击某个视频文件，右侧开始播放。
难点就在于左上方的文件目录树，考虑用TREEVIEW控件结合ADIR函数遍历VIDEO文件下的树形结构，这个肯定可行，就是代码实现太麻烦，有没有一个这样的现成的控件，类似于GETDIR函数（但要嵌入到表单中），每点击一次树形结构中的某个节点，就执行一段代码（事件），代码中可以通过这个控件的某个属性得知用户点击的是哪个文件夹，如果该文件夹下面有文件，将它们显示在下面的表格中。

[此贴子已经被作者于2020-3-30 21:19编辑过]

播放时通常不会时时去文件列表里点来点去，用 GETDIR+ADIR 就可以了吧。

搞了一天，使用了表格实现树（根据层级前面缩进），比较丑，哈哈！

搞了一天，使用了表格实现树（根据层级前面缩进），比较丑，哈哈！

效果也不错的吗！用 treeview 再搞一下，效果又进一步了，不过、功夫活呀！

其实表格也可以再搞的漂亮一些，就是需要给表格列增加容器对象，容器中使用LABEL和PICTURE两种对象，利用容器控件的ACCESS事件为LABEL赋值，改变PICTURE图片……。哈哈，不想再搞了，能用就行。

思路可以呀，只是注意用小小的图片，无边框容器就成的啦！

以前写过这样的控件，不太好用，因为总是担心用户的电脑上注册OCX控件的问题，因为树形框不是vfp内置控件，而是ActiveX控件，在自己电脑上写好，拿给别人用的时候，时不时出现别人电脑上注册控件的问题，烦不胜烦，后来用VB重新写了一个DLL。其实道理差不多，还是面临注册控件的问题。不过VB中的树框写代码的时候比较好用。