从IE拖动一个超链接到窗口时怎么得到此链接的文字,我只能得到地址.

Question

很简单，在Form上放一个Richedit即可。

Answer 1

BOOL CUrlOleDropTarget::OnDrop(CWnd* pWnd, COleDataObject* pDataObject, 
                 DROPEFFECT dropEffect, CPoint point )
{           
    HGLOBAL  hGlobal;
    LPCSTR   pData;                      if (pDataObject->IsDataAvailable(CF_TEXT))
{
STGMEDIUM Stg;
BOOL bValue = pDataObject->GetData(CF_TEXT, &Stg); TCHAR *strText = (TCHAR*)GlobalLock(Stg.hGlobal);

CString strUrl;
strUrl.Format("%s",strText); //m_pParent->MessageBox(strUrl);
//m_pParent->SetFocus();
MessageBox(::GetForegroundWindow(),strUrl,"链接",MB_OK|MB_ICONINFORMATION); GlobalUnlock(Stg.hGlobal);
GlobalFree(Stg.hGlobal); }    if((dropEffect&DROPEFFECT_MOVE) != DROPEFFECT_MOVE)
        return FALSE;    hGlobal=pDataObject->GetGlobalData(CF_TEXT);
    pData=(LPCSTR)GlobalLock(hGlobal);    
    ASSERT(pData!=NULL);     GlobalUnlock(hGlobal);    return TRUE;
}

Answer 2

我在上面不是告诉过你了吗？在form上放一个richedit，从IE拖动一个超级链接到richedit，看看发生了什么事情？

Answer 3

不行啊，怎么拖的啊，FORM会失去焦点，拖不上去的啊？

Answer 4

你把FormStyle设为fsStayOnTop就可以了。