类组件注册热键和拖放对象

.如果真 (RegisterHotKey (窗口句柄, s ＋ 1, 功能键, 键代码) ≠ 0)
s ＝ s ＋ 1
J_热键ID ＝ s
J_窗口句柄 ＝ 窗口句柄
J_挂接指针 ＝ 到整数 (挂接热键事件)
.如果真 (J_热键回调地址 ＝ 0)
J_热键回调地址 ＝ 类_取内部方法地址 (5) ' 这句.因为它在第5位,所以5
J_返回指针 ＝ SetWindowLongA (J_窗口句柄, -4, J_热键回调地址)