[R] Récupérer la référence du bouton après clic

[jpascal]

Bonjour,

J'ai une liste d'objets pour lesquels je peux appliquer une fonction Test() à l'aide d'un bouton.
Je génère la liste à l'aide d'une boucle.
Vu que j'utilise la fonction GUICtrlSetOnEvent(), je ne peux pas ajouter un paramètre à la fonction et donc la référence du bouton.

Comment faire en sorte que la fonction Test() récupère la référence du bouton cliqué ?

► Afficher le texte

Code : Tout sélectionner

$Form = ...
For $i = 0 To 4
    Assign("Button" & $i, GUICtrlCreateButton("Test", 140, $y, 70, 25))
    GUICtrlSetOnEvent(Eval("Button" & $i), "Test")
    $y += 30
Next
...

Func Test()
    ;$num = ???
    MsgBox(0, "", "Le bouton cliqué est le numéro " & $num
EndFunc

[jguinch]

Dans ta fonction Test() tu peux récupérer l'ID du contrôle avec @GUI_CtrlId

[jpascal]

Ca fonctionne nickel. Merci jguinch.

[jguinch]

ça fonctionne, mais cela dit tu devrais plutôt passer par des tableaux :

► Afficher le texte

Code : Tout sélectionner

Global $aButtons[5]
For $i = 0 To UBound($aButtons) - 1
    $aButtons[$i] = GUICtrlCreateButton("Test", 140, $y, 70, 25))
    GUICtrlSetOnEvent(Eval($aButtons[$i]), "Test")
    $y += 30
Next