如何让我的播放器支持拖放？(8分)

P

plzw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-05

• #1

即，将文件拖动到我的播放器之后，就可以播放该文件。

 

Y

yeath

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-05

• #2

哦： 捕获你的WM_DROPFILES消息就行了。

 

C

cqboyz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-05

• #3

你可以试一试DragDrop控件,这里有下载http://www.melander.dk

 

P

plzw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-07

• #4

你给我的地址，我打不开，你要是有那个控件的话，麻烦发到e-bz@163.com，谢谢！

 

云

云携雨(新生)

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-07

• #5

文件拖放到 Form 的实现如下：
在 TForm1.Create 中加入一句：
DragAcceptFiles(Self.Handle,Enabled);
让它接受拖放操作，然后使这个 Form 能够解释拖放内容：
procedure DropFiles(var Msg:TMessage);message WM_DROPFILES;

对消息进行查询就可以知道文件数和文件名：
DragQueryFile(Msg.WParam,$FFFFFFFF,@FileName,256);// 第一次调用得到拖放文件的个数
DragQueryFile(msg.WParam,i,@FileName,256);// 第二次调用得到文件名称
将得到的文件名称送入你的播放器进行播放。

 

P

plzw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #6

小小分数，不成敬意！