组件拖放对象类模块

易语言 2020-06-11 12:10:00

G_窗口句柄 = 窗口句柄
G_挂接指针 = 挂接拖放事件
DragAcceptFiles (G_窗口句柄, 1)
G_返回指针 = SetWindowLongA (G_窗口句柄, -4, 取类内部方法地址 (5)) ' 取类内部方法地址 (5) 这句.因为它在第5位,所以5。