请教赋值的问题

电脑寄生虫

api是系统默认的名字,没改,主要是不知道是怎么就改变了参数的值,放在那里也没见他赋值啊.

[e]

• .版本 2
• .子程序 _标签3_鼠标位置被移动, 逻辑型
• .参数 横向位置, 整数型
• .参数 纵向位置, 整数型
• .参数 功能键状态, 整数型
• .局部变量 是否移入, 逻辑型, 静态
• .如果 (0 ≤ 横向位置 且 横向位置 ≤ 标签3.宽度 且 0 ≤ 纵向位置 且 纵向位置 ≤ 标签3.高度)
•     .如果真 (是否移入 ＝ 假)
•         SetCapture (标签3.取窗口句柄 ())    ’主要是这个地方，单步调试发现，执行完这步后，横向位置变65506（左右差不了几个数）了。
•         标签2.标题 ＝ “鼠标移入”
•         是否移入 ＝ 真
•     .如果真结束
• .否则
•     .如果真 (是否移入 ＝ 真)
•         ReleaseCapture ()
•         标签2.标题 ＝ “鼠标移出”
•         是否移入 ＝ 假
  

[/e]

追忆流年

电脑寄生虫 发表于 2012-4-1 20:03
我发帖怎么老出问题....在发一次试试

具体什么情况我不太明白，可能是这么回事，是标签的事件问题。
建议：用SetWindowsHookEx(14,,,)和CallNextWindowsHookEx()来检测鼠标。

电脑寄生虫

我发帖怎么老出问题....在发一次试试
[e]    .版本 2



    .子程序 _标签3_鼠标位置被移动, 逻辑型

    .参数 横向位置, 整数型

    .参数 纵向位置, 整数型

    .参数 功能键状态, 整数型

    .局部变量 是否移入, 逻辑型, 静态



    .如果 (0 ≤ 横向位置 且 横向位置 ≤ 标签3.宽度 且 0 ≤ 纵向位置 且 纵向位置 ≤ 标签3.高度)

        .如果真 (是否移入 ＝ 假)

            SetCapture (标签3.取窗口句柄 ())    ’主要是这个地方，单步调试发现，执行完这步后，横向位置变65506（左右差不了几个数）了。

            标签2.标题 ＝ “鼠标移入”  

            是否移入 ＝ 真

        .如果真结束



    .否则

        .如果真 (是否移入 ＝ 真)

            ReleaseCapture ()

            标签2.标题 ＝ “鼠标移出”

            是否移入 ＝ 假[/e]