CrichEditView禁止OLe托拽？急...............

[gag2463]

继承了一个CrichEditView,直想用来支持文本
想禁掉Ole托拽 除CF_TEXT 之外的情况
重载了 QueryAcceptData 缺不行
兄弟姐妹们帮着看看给实现一下 多谢！~
现在代码如下：
HRESULT CScriptView::QueryAcceptData(LPDATAOBJECT lpdataobj,
CLIPFORMAT* lpcfFormat, DWORD /*dwReco*/, BOOL bReally, HGLOBAL hMetaPict)
{
ASSERT(lpcfFormat != NULL);
if (!bReally)
return S_FALSE;
if (IsRichEditFormat(*lpcfFormat))
return S_FALSE;
COleDataObject dataobj;
dataobj.Attach(lpdataobj, FALSE);

m_lpRichEditOle = NULL;
HANDLE hData = dataobj.GetGlobalData(CF_TEXT);
if (hData == NULL) {
// 托拽图片
long lrst = RevokeDragDrop(this->GetSafeHwnd());
return S_FALSE;
}
}
查看了一下 用的 RichEditView的Handle ，是我所传入的handle
并且返回值也正常 为0，
但是拖拽过来的图片什么的 还是会显示在View上 费解!~

[zhoujianhei]

HRESULT CWordPadView::QueryAcceptData(LPDATAOBJECT lpdataobj, CLIPFORMAT* lpcfFormat, DWORD dwReco, BOOL bReally, HGLOBAL hMetaFile)
{
COleDataObject   dataobj;       
        dataobj.Attach(lpdataobj,   FALSE); 
		if(!dataobj.IsDataAvailable(CF_TEXT))
			return S_FALSE; 
	return CRichEditView::QueryAcceptData(lpdataobj, lpcfFormat, dwReco, bReally, hMetaFile);
}

[zhoujianhei]

// From the WordPad sample, wordpvw.cpp
HRESULT CWordPadView::QueryAcceptData(LPDATAOBJECT lpdataobj,
   CLIPFORMAT* lpcfFormat, DWORD reco, BOOL bReally,
   HGLOBAL hMetaPict)
{
   if (*lpcfFormat != CF_TEXT)
      return S_FALSE;

   return CRichEditView::QueryAcceptData(lpdataobj, lpcfFormat, reco,
      bReally, hMetaPict);
}

[gag2463]

还是不行
拖拽过来的文件如快捷方式 快捷方式的图标就会显示在View上

我用的VIew已经显示了特定的文件 不用显示拖拽过来的文件的文本内容
禁止外来的拖拽就可以 最好还能实现View内部文本的拖拽

[gag2463]

这个方法和我上面写的是一样的吧？
我最近在View 的初期刷新的时候加了句 DragAcceptFiles(FALSE); 后好用
不知道为什么只用
HANDLE hData = dataobj.GetGlobalData(CF_TEXT);
if (hData == NULL) {
long lrst = RevokeDragDrop(this-> GetSafeHwnd());
这几句不行

[yaolixing]

重载
WindowProc(UINT message, WPARAM wParam, LPARAM lParam)
if (WM_DROPFILES== message)
{
TRACE0("Forbit DropFiles @CSynEditView::WindowProc\n");
return S_FALSE;
}