文件拖拽到ListBox的问题-CSDN论坛

文件拖拽到ListBox的问题

Delphi > VCL组件开发及应用

收藏回复

[问题点数：50分，结帖人chenzhechenge]

⋅如何多行删除ListBox的Item ⋅如何关闭“我的电脑”窗体 ⋅读取MP3长度 更多帖子 关注私信空间博客 chenzhechenge 等级 本版专家分：320 结帖率 100%: 我用下列代码实现文件拖拽到ListBox时，ListBox显示文件路径：

procedure   Tform1.DropFiles(var  msg :tmessage);
var
    char1:array[0..128] of char ;
    char2:pchar;
    i,sum:integer;
begin
     sum:=dragqueryfile(msg.WParam,$FFFFFFFF,nil,0);
     char2:=@char1;
     for i:=0 to sum-1 do
     begin
        dragqueryfile(msg.WParam,i,char2,128);
        ListBox1.Items.Add(char2);
     end;
   dragfinish(msg.WParam);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
   dragacceptfiles(listbox1.handle,true);
end;

我只想让ListBox显示文件的路径，而不显示文件夹的路径，如何实现Listbox识别我拖拽的是文件还是文件夹,除了判别文件后缀的方法外，还有其他方法吗？

2004-09-03 18:29:23

点赞只看楼主引用举报楼主收起

展开阅读全文

⋅关于IdHTTP的问题 ⋅关于dev_queue_xmit ⋅关于Spring中数据库连接 更多帖子 关注私信空间博客 zysmiracle 等级 本版专家分：245: 用ExtractFileName()函数，函数本身会返回不含路径的文件名，
如果文件名为空，那么返回的是空字符串，也就是说这是个路径名。

2004-09-03 20:00:06

点赞只看TA 引用举报 #1得分 30

⋅struts的validator-rules.xml问题 ⋅关于System.arraycopy效率的质疑，欢迎大家进来讨论 ⋅为了表达四川汶川大地震遇难同胞的深切哀悼，散分 555~~ 更多帖子 关注私信空间博客 blazingfire 等级 本版专家分：25731 勋章 红花 2008年5月 Delphi大版内专家分月排行榜第一 2002年9月 Delphi大版内专家分月排行榜第一 蓝花 2002年10月 Delphi大版内专家分月排行榜第三: 识别你拖拽的是文件还是文件夹:
function GetFileType(const FilePath: String): Integer;
{ Return value -1:Error;   0:File;   1:Directory }
var
  Handle: THandle;
  FindData: TWin32FindData;
  LocalFileTime: TFileTime;
begin
  Handle := FindFirstFile(PChar(FilePath), FindData);
  if Handle <> INVALID_HANDLE_VALUE then
  begin
    Windows.FindClose(Handle);
    if FindData.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY then
      Result := 1
    else
      Result := 0;
  end
  else
    Result := -1;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if GetFileType('D:') = 1 then
    ShowMessage('Dir');
end;

2004-09-03 20:02:29

点赞只看TA 引用举报 #2得分 15

⋅－－－－常见但麻烦的问题：网站前后台资源同步，欢迎讨论！！

⋅*** Login控件关于记住密码的问题，会的都来看看。

⋅******** oracle 有没有监听时间触发事件的功能？

更多帖子

关注私信空间博客

wilowind

等级

本版专家分：3958: 根据文件的属性判断.

findfirst 的参数里有个 attr 其值为faDirectory 表示目录.

2004-09-03 20:04:10

点赞只看TA 引用举报 #3得分 5

收起

收藏回复

chenzhechenge

等级：

关注私信 TA的帖子

用MFC实现文件拖放到ListBox: 用MFC实现文件拖放到ListBox 一．对话框工程： 1．建立一个对话框程序，将对话框Extend Style中选中Accept File 选项。 2．在对话框中添加一个listbox控件，ID为IDC_DIALOG_LIST，去掉sort style。 3、手工...

C#中让ListBox支持文件路径的拖放: 有时，我们程序，需要加载一个文件列表，这个列表，通常用ListBox来存放，为了方便操作，让listBox支持拖放入文件的路径，是个非常好的功能，在.NET里面实现这个功能，是非常方便，只需要3个步骤：将 ListBox 的 ...

可拖拽的ListBox: 之前在写播放器的时候，遇到了一个问题，现在播放器无论是千千，KuGoo还是比较原始的MediaPlayer，它们的播放表都是可以拖拽的，直接把文件拖到播放表实现歌曲的添加那个先暂且不说，光是播放表里面的歌曲次序也可以...

C# listbox文件拖拽: C# listbox文件拖拽，可以进行拽入和拽出操作。

【WPF】拖拽ListBox中的Item: 原文:【WPF】拖拽ListBox中的Item整理了两个关于WPF拖拽ListBox中的Item的功能。...需求一：两个ListBox，拖拽其中一个ListBox的Item，放置到另一个ListBox中。参考 http://www.c-sharpcorner.com/uploadfil...

C#Winform 实现ListBox中项的拖拽: private void lstRead_MouseDown(object sender, MouseEventArgs e) { if (this.lstRead.SelectedItem == null) { return; } //开始拖放操作，Dr

win32下Listbox文件拖放及delete键删除: 前一篇我们讲了win32下编辑框的文件拖放，今天我们来讲讲ListBox下的文件拖放，其实原理是一样的，可以复用编辑框文件拖放的代码，在编辑框文件拖放中我们只是实现了单个文件拖放，在ListBox中我们来实现一次性多个...

【VB6】文件拖拽技术: 文件拖拽的例子很多，比如你用QQ的时候，将文件拖拽到聊天窗口就进入了文件传输的窗口现在开始：接收对象首先，我们这次让ListBox接受文件的拖入1.配置ListBox 属性值 OLEDragMode 0 - Manual OLEDropMode 1 -...

delphi文件拖拽到窗体指定控件: delphi文件拖拽到窗体指定控件

Delphi ListBox控件/事件: 选择路径下的文件的处理.: Delphi ListBox控件/事件: 选择路径下的文件的处理.如下: ![图片说明](https://img-ask.csdn.net/upload/201702/21/1487607819_483214.png) 1.点击ListBox控件引发事件: 让该文件的文件名后缀变化为: ".a0"; 2.点击...

delphi 实现拖拽打开文件: 步骤如下，delphi 7...2、增加拖拽的消息处理函数 //声明 protected procedure WMDROPFILES(var Msg : TMessage); message WM_DROPFILES; //实现 procedure TForm1.WMDROPFILES(var Msg:

VB.NET ListBox内容用鼠标拖动和按钮移动实现排序功能: VB.NET ListBox内容用鼠标拖动和按钮移动实现排序功能 VS2010

Windows界面编程第七篇 文件拖拽 文件拖放: Windows界面编程第七篇 文件拖拽 文件拖放

让ListBox控件支持拖动: 通常我们通过ListBox控件来显示我们的信息列表，然后我们可以通过鼠标来选择我们的条目信息，但VC中的ListBox控件是不支持拖动的。也许我们有时需要改变我们的列表顺序，已适应我们的要求，下面是实现的方法。　...

Silverlight 拖动客户端文件 到ListBox: voidMainPage_Loaded(objectsender,RoutedEventArgse){listBox.AllowDrop=true;listBox.DragEnter+=newDragEventHandler(listBox_DragEnter);listBox.DragL...

Windows界面编程第七篇 文件拖拽(文件拖放): 本文配套程序下载地址为：http://download.csdn.net/detail/morewindows/5128654转载请标明出处，原文地址：http://blog.csdn.net/morewindows/article/details/8634451欢迎关注微博：http://weibo.com/MoreWindows...

PB实现拖拽或粘贴文件: PB实现拖拽或粘贴文件

jquery使用列表标签实现的可拖拽listbox: 前两天遇到朋友提到listbox. 所以心血来潮，花了一下午时间自己使用jquery,利用列表标签实现了一个...标签的使用：既然是列表，那无疑选择使用列表标签（ul,ol）等比较方法，考虑到，如果需要数字的修饰，最终采用ol标

文件拖拽效果----C++实现: 告诉大家三个API函数一切就OK。。。。 DragAcceptFiles，DragQueryFile和...界面放了一个listbox。。成员变量：m_list。在OnInitDialog()中添加: this->DragAcceptFiles(TRUE); 再给这个对话框添加一个WM_DROP

C# 多个(N个)ListBox之间的拖动方法: 需求说明：在窗体界面中有多个ListBox要实现之间的数据拖动，下面是封装的一个方法，实现N个ListBox的数据拖放操作。可任意拖放数据到任意的ListBox 附上截图、代码、示例项目文件：代码： using ...

Edit Control实现文件拖拽: 现在有很多软件都支持拖拽功能，就是用鼠标拖着文件放到软件窗口中某个位置，软件就可以做出相应的反应。比如，Windows自带的播放软件Windows Media Player，你可以拖着一个媒体文件放到它的主窗口中，它就会开始...

C#源码--拖拽文件到指定控件并获得其路径（by Peng）: 通过从桌面或其他地方拖拽指定类型的文件到控件上，然后获得被拖拽文件的操作路径，源程序中是以拖拽到listbox为例介绍的，看了就懂，互相学习，呵呵

Wpf解决TextBox文件拖入问题、拖放问题: 在WPF中，当我们尝试向TextBox中拖放文件，从而获取其路径时，往往无法成功（拖放文字可以成功）。造成这种原因关键是WPF的TextBox对拖放事件处理机制的不同，解放方法如下：使用PreviewDragOver和...

VB.Net程序设计：拖放数据操作-从ListBox中拖放数据到ListBox 中: VB.Net程序设计：从ListBox中拖放数据到ListBox 中。（VS2005）运行界面图：代码： Public Class FrmList2ListClass FrmList2List Dim i As Integer Private Sub Button1_Click()Sub Button1_Click...

VC 列表框拖拽: 可以使用，两个list 之间的，相互拖拽数据，好用简单，作为测试使用

python关于tkinter中绑定了Scrollbar的Listbox或Text的控件实时更新的问题: 本人最近在用python的tkinter来生成界面，过程中遇到了不少问题，其中最让我难受的就是关于绑定Scrollbar的Text控件的问题。问题的大概是这样的： 1. 首先我创建了一个Scrollbar控件，然后创建了一个Text控件用来...

拖拽文件获得文件路径: //拖拽文件void CKnowledgeToolDlg::OnDropFiles(HDROP hDropInfo){// TODO: Add your message handler code here and/or call default// 定义一个缓冲区来存放读取的文件名信息TCHAR szFileName[MAX_PATH + 1] = {0...

如何用MATLAB实现拖拽控件: 一般来说，MATLAB自身的GUI是不能够实现将文件夹或者文字拖拽进去进行读取的，就像用QQ邮箱上传文件一样：然后我们用MATLAB实现的效果如下：这个控件并不是用过MATLAB自带的函数实现的，而是通过调用Java来...

MFC中实现单个控件接收拖拽文件的功能: 现在有很多软件都支持拖拽功能，就是用鼠标拖着文件放到软件窗口中某个位置，软件就可以做出相应的反应。比如，Windows自带的播放软件Windows Media Player，你可以拖着一个媒体文件放到它的主窗口中，它就会开始...

c# wpf listbox 高度_WPF快速入门系列(1)——WPF布局概览: 一、引言　关于WPF早在一年前就已经看过《深入浅出WPF》这本书，当时看完之后由于没有做笔记，以至于我现在又重新捡起来并记录下学习的过程，本系列将是一个WPF快速入门系列，主要介绍WPF中主要的几个不同的特性，如...

相关热词 c# 负数补码 c# 读取json c# 画图超出画布判断 c#在注册表下创建个文件 c#中的数组添加元素 c#逆向 c#输出xml文件中元素 c#获取系统盘符 c# 微信发送图片消息 c# 对时间