AutoIt Français

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 400, 218, 192, 124)
$Edit1 = GUICtrlCreateEdit("test", 24, 8, 361, 145)
$label1 = GUICtrlCreateLabel("Appuyez sur la touche ENTREE pour Trouver la position du curseur dans $Edit1", 24, 168, 218, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet("{enter}","_enter")

While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

func _enter()
    if Controlgetfocus(WinGetTitle($Form1)) <> "edit1" Then
        msgbox(0,"","impossible de trouver la position du curseur car $Edit1 n'est pas sélectionné","",$Form1)
    Else
        if guictrlread($Edit1) = "" Then
            msgbox(0,"","Le curseur se situe après le caractère 0 du texte contenu dans le control $Edit1 car $Edit1 est vide.","",$Form1)
        Else
            msgbox(0,"","Le curseur se situe après le caractère n du texte contenu dans le control $Edit1. Comment faire pour trouver le caractère n ?","",$Form1)
        EndIf
    EndIf
EndFunc