如何实现将IE中的网址拖动到我的程序中，象网络蚂蚁的浮动窗口一样？(100分)

本人正在编写一个网址书签管理器，能把IE中的网址拖动到我的Form上时，我
可以将网址添加到自己的书签中。
如何实现将IE中的网址拖动到我的程序中，象网络蚂蚁的浮动窗口一样？

自己一个拖动窗口，然后使用DragDrop（DELPHI天空的COOL构件中就有：
http://delphi.yesite.com）组件中的DROPURL来实现URL地址的拖动。另外还应该注意。在拖
动窗口中加上如下的代码。
{public
{ Public declarations }
procedure CreateParams(var Params:TCreateParams);override;}
rocedure TForm3.CreateParams(var Params:TCreateParams);
begin
inherited;
with Params do
begin
Style:=Params.Style xor WS_DLGFRAME;
WndParent:=0;//此行
end;
end;

procedure TForm3.FormCreate(Sender: TObject);
begin
Width:=36;
Height:=36;
SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
end;
以使拖动窗口彻底不受主窗口的摆布。

让liguang领先一步,DragDrop发给你好不好?

千万注意拖动到窗体的对象属性（要判断是否为连接）

多谢各位，我会试用，现给各位加分，浪刀兄能把控件或程序发过来更好！

已发出,望接收!