文件名称:Delphi 拖放文件显示路径-支持打开多文件.rar
文件大小:8KB
文件格式:RAR
更新时间:2022-07-30 11:58:11
Delphi源码-文件操作
Delphi 文件拖放显示路径-支持打开多文件,是一种比较人性化的文件打开方式,拖动文件到Delphi窗口中,即可获取并显示文件路径,本源码还可获取拖放的文件个数,程序运行界面如演示截图所示。拖动文件放入本窗口中,即可显示出该文件所在的路径文件夹信息。实现思路也挺简单:先建立工程然后添加一个memo控件,用来存放路径。拖拽文件需要用到shellAPI所以,在单元里面需要添加shellAPI, 在过程里 procedure TForm1.FormCreate(Sender: TObject);加入此函数DragAcceptFiles(Form1.Handle,true); //注册拖放文件。
【文件预览】:
codesc.net
----多文件拖拽()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(4KB)
--------Unit1.~ddp(51B)
--------Unit1.dfm(672B)
--------Project1.cfg(446B)
--------说明.txt(67B)
--------Project1.dpr(188B)
--------Unit1.~dfm(502B)
--------Project1.dof(2KB)
--------Unit1.~pas(1KB)
--------Unit1.pas(1KB)