从Windows资源管理器中拖动文件

原创 2004年06月14日 17:23:00

这里我们主要简单的讨论一下,如何从Windows资源管理器中拖动一组文本,然后将它们拖放到一个文本框控件中就可将文件全部打开。
为了说明这一点,以下过程可用一个文本框控件以及OLEDragOver和OLEDragDrop事件,并用DataObject对象中的Files属性和vbCFFiles数据格式打开一组文本文件。

首先在Visual Basic中启动新的工程。向窗体添加一个文本框控件并将其OLEDropMode属性设置为"手工"。将MultiLine属性设置为True,将ScrollBars设为2-Vertical,并清除Text属性

代码如下:

Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Data.GetFormat(vbCFFiles) Then
For Each vfn In Data.Files '循环打开文件
Open vfn For Input As #1
Do While Not EOF(1)
Line Input #1, linefile
Text1 = Text1 & linefile & vbCrLf
Loop
Close #1
Next vfn
End If
End Sub

下列事件中,用GetFormat方法检测兼容的数据格式(vbCFFiles)
Private Sub Text1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
If Data.GetFormat(vbCFFiles) Then
'若数据格式正确,则把即将执行的操作通知源
Effect = vbDropEffectCopy And Effect '放下的结果为复制
Exit Sub
End If
'若数据格式不合适,则不放下
Effect = vbDropEffectNone
End Sub

自定义Windows资源管理器预览的实现

在Windows中,资源管理器对文件的预览是通过系统PreviewHandler组件实现的,因此,想要实现自定义的PreviewHandler就需要实现一个定义了预览接口COM组件。 从Micros...
  • hey_zng
  • hey_zng
  • 2016年03月18日 17:47
  • 1750

在 Windows 资源管理器中用右键单击一个文件或文件夹时性能暂时下降

在 Windows 资源管理器中用右键单击一个文件或文件夹时性能暂时下降英文  http://support.microsoft.com/default.aspx?scid=kb;en-us;8191...
  • Tmstarstone
  • Tmstarstone
  • 2006年06月29日 19:03
  • 1602

用Visual C++打造自己的资源管理器

Windows的资源管理器想必大家都用过,该程序的窗口一分为二,左边的窗口显示本机当前所有驱动器以及驱动器中的所有文件夹,当用户单击文件夹后,如果该文件夹下面还有子文件夹,则上层文件夹展开显示下级的文...
  • hczhiyue
  • hczhiyue
  • 2014年01月16日 22:18
  • 1777

windows资源管理器的实现实例

Windows的资源管理器想必大家都用过,该程序的窗口一分为二,左边的窗口显示本机当前所有驱动器以及驱动器中的所有文件夹,当用户单击文件夹后,如果该文件夹下面还有子文件夹,则上层文件夹展开显示下级的文...
  • u010983763
  • u010983763
  • 2016年10月25日 11:13
  • 1728

Windows点击任务栏中的文件夹直接进入资源管理器界面设置

系统:Windows 7 (W8 / W10尚未测试) 相信当大家点击任务栏下面的文件夹时一般出现的窗口是这样 地址栏里面显示的是“库” 里面分别有:视频、图片、文档音乐。 但是这个对于我们来说 好像...
  • singit
  • singit
  • 2017年02月08日 19:35
  • 852

Windows 10 资源管理器黑色风格

今天来水一篇,说说我前几天某天上午初步实现了我一直想弄的东西:Windows 10 资源管理器黑色风格,用了几天,整体上感觉还不错,当然也有点小瑕疵,我会在后面说。先睹为快实现后的界面是这样的: 主...
  • u010099080
  • u010099080
  • 2017年10月26日 22:47
  • 964

用Total Commander替换windos默认资源管理器的方法

用Total Commander替换windos默认资源管理器的方法   Total Commander(简称TC)是一个功能强大的资源管理器。   TC本身没有自带的替换windows资源管理器...
  • u010528745
  • u010528745
  • 2014年12月05日 22:44
  • 2912

Win7文件夹无法附到“windows资源管理器”实现快速打开的解决方法

Win7文件夹无法附到“windows资源管理器”实现快速打开的解决方法   解决方法:将下面的路径直接用开始-->运行打开。 删除文件夹内的所有文件,然后将要固定的文件夹重新拖到任...
  • quanhongliang9
  • quanhongliang9
  • 2014年12月26日 14:56
  • 702

Win7下如何在windows资源管理器中打开FTP

大家在使用网络的过程中,往往会登陆一些FTP站点,通过这些站点来下载一些软件,以前在IE6中,打开FTP后,就会直接看见文件夹,就如同打开本地硬盘一样,这样很直观也很容易操作。但是在IE8(家庭网络)...
  • happymagic
  • happymagic
  • 2014年05月05日 20:29
  • 35288

windows 7 无法在资源管理器中查看此ftp站点

1.先在IE高级选项里勾上,启用ftp文件夹视图,IE9是写法不一样,但是人就看得懂,勾上就行了     然后在IE中(如果是IE9,请按Alt键先弹出菜单栏,"查看"->"工具栏"->.勾上"命令...
  • u012954083
  • u012954083
  • 2014年11月01日 18:14
  • 1720
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:从Windows资源管理器中拖动文件
举报原因:
原因补充:

(最多只允许输入30个字)