【已解决】请教如何实现ctrl+a全选功能

kxing · 发表于 2011-6-18 10:27:22

本帖最后由 kxing 于 2011-6-20 07:43 编辑

希望在guictrlcreateedit控件使用ctrl+a全选内容。
希望高手解答，多谢！

wsfda · 发表于 2011-6-18 18:24:28

路过，帮顶....

joyue9 · 发表于 2011-6-18 21:54:55

学习了..顶一个

3mile · 发表于 2011-6-18 23:34:33

#include <GUIConstantsEx.au3>
#include <GUIEdit.au3>

$Form1 = GUICreate("Test")

$Edit1 = _GUICtrlEdit_Create($Form1, "测试 'CTRL+A' 有效不?", 10, 10, 380, 380)
$Dummy = GUICtrlCreateDummy()

GUISetState(@SW_SHOW)

Local $Key[1][2] = [["^a", $Dummy]]
GUISetAccelerators($Key)
_GUICtrlEdit_SetSel($Edit1, 0, 0)

While 1
        Switch GUIGetMsg()
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Dummy
                        Local $aResult = DllCall("user32.dll", "hwnd", "GetFocus")
                        Switch $aResult[0]
                                Case $Edit1
                                        _GUICtrlEdit_SetSel($Edit1, 0, -1)
                        EndSwitch
        EndSwitch
WEnd

淡定开源 · 发表于 2011-6-19 00:13:52

本帖最后由淡定开源于 2011-6-19 00:15 编辑

今天又有收获。

kxing · 发表于 2011-6-20 07:40:58

多谢多谢！！！！

komaau3 · 发表于 2011-6-20 08:18:02

回复 4# 3mile

学习了一直以为是控件样式问题

nwf2011 · 发表于 2011-6-21 10:37:42

不是很方便，还得注册消息

chamlien · 发表于 2017-4-27 14:53:48

挺好用！！

		自动登录	找回密码
密码			加入

[GUI管理] 【已解决】请教如何实现ctrl+a全选功能