| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| 原函数指针 | 子程序指针 | |
拖动接受文件 (取窗口句柄 (),
真)原函数指针 ＝
设置窗口的属性 (取窗口句柄 (),
#GWL_WNDPROC, &WindowProc
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 文件名 | 文本型 | | |
| 返回值 | 整数型 | | |
| 数目 | 整数型 | | |
| i | 整数型 | | |
| 图片集 | 多维矩阵向量 | | |
| 图片 | 多维矩阵 | | |
| TT | 整数型 | | |
文件名 ＝
取空白文本 ( #MAX_PATH )数目 ＝
获取被拖放文件名称 (hDrop, -1, 文件名,
#MAX_PATH )TT ＝
取启动时间 ()
计次循环首 (数目, i
)
获取被拖放文件名称 (hDrop, i － 1, 文件名,
#MAX_PATH )视觉_图像读取 (图片.指针, 文件名,
#读入_颜色 )
如果真 (图片.
空 ())
到循环尾 ()图片集.加入数据 (图片.指针)图片.
数据指针 ()
计次循环尾 ()视觉_拼接器 (图片集.指针, 图片.指针,
#拼接器_全景 )标签.标题 ＝
“耗时：” ＋
到文本 (取启动时间 () － TT
)视觉_显示图像 (“”, 图片.指针
)视觉_等待按键 (0
)标签.标题 ＝
“拖入图片....”设置窗口的属性 (取窗口句柄 (),
#GWL_WNDPROC, 原函数指针
)|
| WindowProc | 整数型 | |
|
| hWnd | 整数型 | | | |
iMsg | 整数型 | | | | wParam | 整数型 | | | | lParam | 整数型 | | | |
如果 (iMsg ＝
#WM_DROPFILES )DropFiles (wParam
)
返回 (0
)
返回 (CallWindowProcA (原函数指针, hWnd, iMsg, wParam, lParam))