怎么让窗体能接收到从ie上过来的拖拽？(200分)

Z

zzfloat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #1

我想做个类似网络蚂蚁的东西，但不只怎么接受拖过来的url请，如何使窗体支持ole拖拽
还有断点续传在这怎么实现！

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #2

学习！

提前！

 

T

tulipfan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #3

得分真容易^_^
用DragandDrop： http://www.melander.dk/
现有3.7稳定版，4.0测试版
如果上不了，我发给你，或用自己查找。
她的作者也是GifImage的作者。

 

B

bubble

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #4

我只会窗体接受文件拖拽，如果你写这个我到可以帮助你。[]
如果你得到了接受ie拖拽的源代码，请公开一下，谢谢。

 

H

han.lab

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #5

我又来晚了。

Drag and Drop Component Suite是个不错的东东，可以从Torry's Delphi上下。
http://www.torry.net/draganddrop.htm
http://www.torry.net/vcl/system/draganddrop/dragdrop.exe
(421KB)

里面带有例子和使用帮助。

关键就是
1、FormCreate中的语句：
DropURLTarget.Register(Memo_DropOnMe)

2、DropURLTarget的Drop事件procedure DropURLTargetDrop...;
begin
Edit1.Text := DropURLTarget.URL;
WebBrowser1.Navigate (WideString(Edit1.Text));
end;

我用这个控件做了个试验程序，还不错。

 

Z

zzfloat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-12

• #6

我不想用控件，能不能用代码实现？han.lab你的代码直接加在窗体中就可么？
DropURLTarget.Register(Memo_DropOnMe)这个函数可以直接用么？

 

H

han.lab

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-12

• #7

如果你想纯用代码实现就需要看看Drag and Drop中的源代码了。
我是用控件实现的。上次的代码中，DropURLTarget是一个Drag and Drop中的控件。Memo_DropOnMe是我的一个Memo控件。抱歉上次没有说清楚。

 

Z

zzfloat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-13

• #8

我去看看！