[Solved] Click để chọn tất cả văn bản trong Edit Control

Dùng Ctrl + A để Select All :

Mã (AutoIt):

$GUI = GUICreate("GUI", 310, 210)
$Edit1 = GUICtrlCreateEdit("", 2, 2, 300, 100)
$Edit2 = GUICtrlCreateEdit("", 2, 104, 300, 100)
$Ctrl_A = GUICtrlCreateDummy()
GUISetState()

Local $DefButton[1][2] = [["^a", $Ctrl_A]]
GUISetAccelerators($DefButton)

While Sleep(20)
    Switch GUIGetMsg()
        Case $Ctrl_A
            $hwnd = ControlGetHandle("", "", "[CLASSNN:" & ControlGetFocus("") & "]")
            GUICtrlSendMsg(DllCall("user32.dll", "int", "GetDlgCtrlID", "hwnd", $hwnd)[0], 0xB1, 0, -1)
        Case -3
            Exit
    EndSwitch
WEnd
 

Dùng Button để Select All :

Mã (AutoIt):

$GUI = GUICreate("GUI", 310, 170)
$Edit = GUICtrlCreateEdit("", 2, 2, 300, 100)
$Button =GUICtrlCreateButton("Select All", 2, 110, 300, 40)
GUISetState()

While Sleep(20)
    Switch GUIGetMsg()
        Case $Button
            GUICtrlSetState($Edit, 256)
            GUICtrlSendMsg($Edit, 0xB1, 0, -1)
        Case -3
            Exit
    EndSwitch
WEnd