发布网友 发布时间:4小时前
共2个回答
热心网友 时间:2小时前
.版本 2
.DLL命令 ScreenToClient, 整数型, , "ScreenToClient", , 该函数应用hWnd参数标识的窗口和POINT结构给定的屏幕坐标来计算用户坐标,然后以用户坐标来替代屏幕坐,新坐标是相对于指定窗口的领域的左上角。
.参数 hwnd, 整数型
.参数 lpPoint, POINT
.版本 2
.数据类型 POINT
.成员 x, 整数型
.成员 y, 整数型
.版本 2
.子程序 _时钟2_周期事件
.局部变量 点, POINT
_启动窗口.标题 = 到文本 (取鼠标水平位置 ()) + “.” + 到文本 (取鼠标垂直位置 ())
点.x = 取鼠标水平位置 ()
点.y = 取鼠标垂直位置 ()
标签1.标题 = 到文本 (ScreenToClient (_启动窗口.取窗口句柄 (), 点))
热心网友 时间:2小时前
LL命令 ScreenToClient, 整数型, , "ScreenToClient", , 该函数应用hWnd参数标识的窗口和POINT结构给定的屏幕坐标来计算用户坐标,然后以用户坐标来替代屏幕坐,新坐标是相对于指定窗口的领域的左上角。
.参数 hwnd, 整数型
.参数 lpPoint, POINT
.版本 2
.数据类型 POINT
.成员 x, 整数型
.成员 y, 整数型
.版本 2
.子程序 _时钟2_周期事件
.局部变量 点, POINT
_启动窗口.标题 = 到文本 (取鼠标水平位置 ()) + “.” + 到文本 (取鼠标垂直位置 ())
点.x = 取鼠标水平位置 ()
点.y = 取鼠标垂直位置 ()
标签1.标题 = 到文本 (ScreenToClient (_启动窗口.取窗口句柄 (), 点))