怎样象netants一样获取web浏览器连接(200分)

请问怎样象netant一样获取web浏览器链接，
怎样添加菜单项（如down by netants)

;我也想知道 {B-)

??????

用hook监视剪贴板
用TClipBoard
判断当前剪贴板的内容是不是一个url

listen

前面有这个问题，已经讨论的很全面了

那里讨论过？

同意she
不然你可以随便在什么地方copy一段url，蚂蚁都会有反应的

修改注册表。
在
HKEY_CURRENT_USER/Software/Microsoft/Internet Explorer/MenuExt 可添加你扩展菜单项。

A example in MFC:

class my_OleDropublic COleDropTarget
{
public:
virtual DROPEFFECT OnDragEnter( CWnd* pWnd, COleDataObject* pDataObject, DWORD dwKeyState, CPoint point )
{
UINT cf=RegisterClipboardFormat(CFSTR_SHELLURL);
if(pDataObject->IsDataAvailable(cf))
return DROPEFFECT_COPY;
else
return DROPEFFECT_NONE;
}
virtual DROPEFFECT OnDragOver( CWnd* pWnd, COleDataObject* pDataObject, DWORD dwKeyState, CPoint point )
{
UINT cf=RegisterClipboardFormat(CFSTR_SHELLURL);
if(pDataObject->IsDataAvailable(cf))
return DROPEFFECT_COPY;
else
return DROPEFFECT_COPY;
}
virtual BOOL OnDrop( CWnd* pWnd, COleDataObject* pDataObject, DROPEFFECT dropEffect, CPoint point )
{
UINT cf=RegisterClipboardFormat(CFSTR_SHELLURL);
if(pDataObject->IsDataAvailable(cf))
{
HGLOBAL hglb=pDataObject->GetGlobalData(cf);
char * pchar=(char *)GlobalLock(hglb);
/********************************************
The URL u want,call normal http related functions to deal with that.
*********************************************/
GlobalUnlock(hglb);
GlobalFree(hglb);
}
return true;
}
};

2.
in COleDDDlg::COleDDDlg(CWnd* pParent /*=NULL*/)

AfxOleInit();

3.
in BOOL COleDDDlg::OnInitDialog()

mDragDrop=new my_OleDrop();
VERIFY(mDragDrop->Register(this));
return TRUE; // return TRUE unless you set the focus to a control

上面的代码是监视剪贴板的，而人家要求的是当在ie中按一的下载连接后，
截获此连接，不让ie去下载。
如果谁知道，请也告诉我一声delphi3@371.net

看看IURLSearchHook接口，也许是这个。

接收URL与接收文件拖放不同，
实际上就与操作剪切板有关！

. .

接受答案了.