找回密码
 加入
搜索
查看: 5525|回复: 5

[GUI管理] 控件点击事件[已解决]

  [复制链接]
发表于 2015-8-19 00:03:46 | 显示全部楼层 |阅读模式
本帖最后由 Huiseyu 于 2015-8-20 13:19 编辑

这个问题试了好几天都没结果...快进胡同了,求助大家点拨一下,如何获取下面控件的点击事件
Local $title = StringRegExpReplace(@ScriptName, '(\..*)', '')
Local $Width = 700
Local $Height = 500
Local $style = 0x10070000
Local $Advanced = 0x00000008
Local $hctr[10 ^ 2][10 ^ 2]
Local $hGui = GUICreate($title, $Width, $Height, -1, -1, $style, $Advanced)
Local $info = GUICtrlCreateLabel('value' ,$Width / 2.2 ,$Height-50,50,25 ,0X01,0x00100000)

For $o = 0 To 16
        For $i = 0 To 14
                $hctr[$i][$o] = GUICtrlCreateLabel($i, 0 + 40 * $o, $i * 23, 40, 25, 0X01, 0x00100000)
        Next
Next
While 1
        Switch GUIGetMsg()
                Case -3
                        Exit
                Case $hctr[0][0]  ; 这个地方如何获取点击事件 ,目前指定数字没有问题,换成$i ,$o就。。 ------
                        GUICtrlSetData($info ,$hctr[0][0])  ;这个地方,用来显示被点击的控件ID --
                        For $ix = 0 To 14
                        Next
        EndSwitch
WEnd
发表于 2015-8-19 13:07:53 | 显示全部楼层
帮顶下,这个有点头疼。
发表于 2015-8-20 10:19:56 | 显示全部楼层
帮你改了改,建议使用一维数组,二维数组控制起来比较麻烦。详见代码
Local $title = StringRegExpReplace(@ScriptName, '(\..*)', '')
Local $Width = 700
Local $Height = 500
Local $style = 0x10070000
Local $Advanced = 0x00000008
Local $hctr[16*14]
Local $hGui = GUICreate($title, $Width, $Height, -1, -1, $style, $Advanced)
Local $info = GUICtrlCreateLabel('value' ,$Width / 2.2 ,$Height-50,50,25 ,0X01,0x00100000)

For $o = 0 To 16*14-1
        $hctr[$o] = GUICtrlCreateLabel(Mod($o,16)&Int($o/16), 40 * Mod($o,16), Int($o/16) * 23, 40, 25, 0X01, 0x00100000)
Next
While 1
        $nMsg = GUIGetMsg()
                Switch $nMsg        
                        Case -3
                                Exit
                        Case $hctr[0] To $hctr[16*14-1]
                                $a = GUIGetCursorInfo($hGui)
                                GUICtrlSetData($info,$a[4])
                EndSwitch
WEnd
发表于 2015-8-20 10:33:54 | 显示全部楼层
注册消息应该也可以解决这个问题。
 楼主| 发表于 2015-8-20 13:18:51 | 显示全部楼层
帮你改了改,建议使用一维数组,二维数组控制起来比较麻烦。详见代码
ap112 发表于 2015-8-20 10:19



    谢谢,正是这效果...结贴
 楼主| 发表于 2015-8-20 13:23:34 | 显示全部楼层
高手果断不一样。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 09:18 , Processed in 0.081058 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表