XE_DROPFILES 事件怎么用？

tmplinshi

1. xc.XInitXCGUI()
   
2. 
   
3. m_hWindow := xc.XWnd_Create(0, 0, 300, 200, "炫彩界面库窗口")
   
4. 
   
5. hEle := xc.XEle_Create(20, 50, 100, 100, m_hWindow)
   
6. xc.XEle_RegEventC(hEle, XE_DROPFILES := 250, "Ele.OnDropFiles")
   
7. 
   
8. xc.XWnd_ShowWindow(m_hWindow)
   
9. 
   
10. xc.XRunXCGUI()
    
11. xc.XExitXCGUI()
    
12. Return
    
13. 
    
14. class Ele {
    
15.         OnDropFiles() {
    
16.                 MsgBox, 拖拽事件
    
17.         }
    
18. }

复制代码

拖拽文件到元素上不会触发事件函数。代码是没有问题的，注册其他的事件能正常运行。
不知道是不是我漏掉了什么。

admin

VOID DragAcceptFiles(          HWND hWnd,
    BOOL fAccept
);

tmplinshi

谢谢指点！