On peut rajouter ce comportement assez simplement avec le code suivant :
Include à rajouter en début de script:
Code : Tout sélectionner
#include <WinAPI.au3>
#include <GUIEdit.au3>
Code à rajouter après la création de l'Edit (un ou plusieurs) et de votre GUI, avant votre boucle infinie.
Code : Tout sélectionner
$hSelAll = GUICtrlCreateDummy()
Dim $AccelKeys[1][2] = [["^a", $hSelAll]] ; Set accelerators for Ctrl+a
GUISetAccelerators($AccelKeys)
GUICtrlSetOnEvent($hSelAll, "WM_COMMAND_CTRLA")
Et la fonction WM_COMMAND_CTRLA à rajouter en fin de script ou dans vos includes:
Code : Tout sélectionner
Func WM_COMMAND_CTRLA()
$hWnd = _WinAPI_GetFocus()
$class = _WinAPI_GetClassName($hWnd)
If $class = 'Edit' Then _GUICtrlEdit_SetSel($hWnd, 0, -1)
EndFunc ;==>WM_COMMAND_CTRLA