請教 按下鍵盤Enter = 對控件做點擊 該如何?

tcpuuu

請教 按下鍵盤Enter  =  對控件做點擊 該如何?

按下鍵盤Enter
=執行底下命令 該如何寫
ControlClick ( "EDIT","","Button1")

showshow

回复 1# tcpuuu

要的是这个吗？

GUICtrlCreateButton("",10,20,10,20,$BS_DEFPUSHBUTTON )

tcpuuu

回复  tcpuuu

要的是这个吗？
showshow 发表于 2012-1-27 17:23

    不是
ControlClick ( "EDIT","","Button1")
這是對edit 窗口 的 Button1 做滑鼠點擊

設熱鍵 enter =     對edit 窗口 的 Button1 做滑鼠點擊
seed ({enter},ControlClick ( "EDIT","","Button1"))

showshow

回复 3# tcpuuu

不懂你什么意思？

tcpuuu

本來要移動滑鼠去點擊Button1
改成  按下鍵盤Enter鍵   就可以去 點擊Button1

menfan1

先获取按钮焦点，再ENTER哈。。

guland

回复 1# tcpuuu


    请使用 HotKeySet
帮助中有详细介绍

afan

GUICreate('')
GUICtrlCreateEdit('', 5, 5, 390, 280)
$But1 = GUICtrlCreateButton('Button1', 200, 300, 100, 20)
GUISetState()
Dim $AccelKeys[1][2] = [["{Enter}", $But1]]
GUISetAccelerators($AccelKeys)

While 1
        Switch GUIGetMsg()
                Case -3
                        Exit
                Case $But1
                        MsgBox(0, 'ok', '按钮1动作')
                        ;ControlClick('EDIT', '', 'Button1')
        EndSwitch
WEnd