[R] Sélectionner un texte dans une Gui

[Boulanza]

Bonjour,
Je m'adresse à vous, je veux que le texte suivant (Ici l'indicatif de votre pays suivie du n° du GSM...) soit sélectionné par défaut en bleu comme la sélection avec la souris.
Merci à vous....
cordialement.

► Afficher le texte

GUICtrlCreateInput("Ici l'indicatif de votre pays suivie du n° du GSM...", 20,270, 240, 25, 0)

[jguinch]

Logiquement, le simple fait de donner le focus au contrôle doit te sélectionne le texte :
GUICtrlSetState($input, $GUI_FOCUS)

Sinon, tu peux forcer la sélection avec _GUICtrlEdit_SetSel
_GUICtrlEdit_SetSel( GUICtrlGetHandle($input), 0, -1)

[Boulanza]

Oui, jguinch, ça marche très bien.

► Afficher le texte

$Input4 = GUICtrlCreateInput("Ici l'indicatif de votre pays suivie du n° du GSM...", 20,270, 240, 25, 0)
GUICtrlSetState($Input4 ,$GUI_FOCUS)

Par contre svp j’ai une autre question :
Si je veux supprimer le texte sélectionné une fois le curseur est dessus, comment faire merci ?

[Hugues]

Salut,

Fourni par Mikell:

► Afficher le texte

Code : Tout sélectionner

    #include <WindowsConstants.au3>

    Global $test, $nix

    $hGUI = GUICreate("Buttons", 400, 400)
    $iMemo = GUICtrlCreateEdit("", 119, 10, 276, 374, $WS_VSCROLL)
    $button = GUICtrlCreateButton("Button1", 10, 10, 90, 50)
    GUISetState()

    GUIRegisterMsg($WM_SETCURSOR, "WM_SETCURSOR")

    While GUIGetMsg()<>-3
    WEnd


    Func WM_SETCURSOR($hWnd, $iMsg, $iwParam, $ilParam)
      If $iwParam<>$test Then
        Switch $iwParam
            Case GUICtrlGetHandle($button)
                    GUICtrlSetData($iMemo, "mouse hover")
                    $nix = 1
            Case Else
                    If $nix Then GUICtrlSetData($iMemo, "")
                    $nix = 0
        EndSwitch
        $test = $iwParam
      EndIf
        Return 'GUI_RUNDEFMSG'
    EndFunc
 

[Boulanza]

Merci pour votre aide.
Voici ma proposition.

► Afficher le texte

$Input4 = GUICtrlCreateInput("", 20,270, 240, 25, 0)
GUICtrlSetTip(-1, "Inscrirez l'indicatif de votre pays d'origine, suivie de votre numéro GSM.")
$widthCell = 150 ; first cell 70 width

Cordialement.