[R] Changer le titre

[ani]

EN gros, je voudrais passer au titre suivant:

Code : Tout sélectionner

Global $aPhrase[3] = ["phrase_1","phrase_2","phrase_3"]
$Form = GUICreate($aPhrase[0], 258, 59, 193, 115)
$Input = GUICtrlCreateInput("", 8, 17, 174, 21)
$Next = GUICtrlCreateButton("Suivant", 192, 16, 57, 25, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
;Case Else ou $Next
; La je ...
;    For $x = 0 to ubound($aPhrase) - 1
;     WinSetTitle("","",$Name[$x])
;    Next
EndSwitch
Wend

AU lancement de la form, le titre de celle-ci sera " Phrase_1 ",
comment faire pour que le bouton next puisse passer au titre suivant

merci

[Tlem]

Comme ceci :

Code : Tout sélectionner

Global $aPhrase[3] = ["phrase_1", "phrase_2", "phrase_3"]
Global $Stage = 0

$Form = GUICreate($aPhrase[0], 258, 59, 193, 115)
$Input = GUICtrlCreateInput("", 8, 17, 174, 21)
$Next = GUICtrlCreateButton("Suivant", 192, 16, 57, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case -3
            Exit
        Case $Next
            $Stage += 1
            WinSetTitle("","",$aPhrase[$Stage])
    EndSwitch
WEnd