论坛 › 已解决问题区 › 怎么在消息循环中触发点击某个Label控件数组

kob5891 发表于 2010-1-19 20:52:36

怎么在消息循环中触发点击某个Label控件数组

本帖最后由 kob5891 于 2010-1-19 22:34 编辑

while 1
ctrlarray[X]=GUICtrlCreateLabel(......)
if ..... then exitloop
wend

X表示不固定整数
当点击某个Label控件时 怎么在消息循环中触发点击某个Label控件呢？

afan 发表于 2010-1-19 21:51:19

再来个循环咯

kob5891 发表于 2010-1-19 22:33:51

问题已解决感谢Sxd


代码如下：
#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
Dim $i,$Form1,$Label

$Form1 = GUICreate("Form1", 233, 354, 193, 115)
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitMe")
For $i=1 To 10
        $Label[$i] = GUICtrlCreateLabel("dddd" & $i, 10+$i*5, 20+$i*30)
        GUICtrlSetOnEvent($Label[$i], "lab")
Next

GUISetState(@SW_SHOW)

While 1
Sleep(1000)
WEnd

Func lab()
        MsgBox(0,0,GUICtrlRead(@GUI_CtrlId))
EndFunc

Func ExitMe()
        Exit
EndFunc

afan 发表于 2010-1-19 22:59:17

呵呵，换事件模式了~~

dajun 发表于 2010-4-30 19:53:06

很好，学习了。

auhj887 发表于 2010-9-11 09:40:45

很好，学习了。。。。。。。。。

liufenglg 发表于 2010-9-22 10:59:44

很好
问题已解决请写到标题中

kirk_xie 发表于 2013-7-3 10:25:15

学习了 刚刚接触这块

查看完整版本: 怎么在消息循环中触发点击某个Label控件数组