Définir des actions sur les widgets
$raz = $frame2->Button(-text=>'RAZ', -command=>\&vider)->pack(-side=>'left', -padx=ᡌ, -pady=ɱ);
$calcul = $frame2->Button(-text=>'Calculer', -command=>\&calcul)->pack(-side=>'right', -padx=ᡌ, -pady=ɱ);
Le code ci-dessus associe des actions aux boutons définis :
- le bouton raz défini dans le widget frame2 est associé à un label texte « RAZ » et à une action définie par l ’appel de la procédure « &vider », le code de cette procédure est défini dans le programme (cf code complet)
- le bouton calcul défini dans le widget frame2 est associé à un label texte « Calculer » et à une action définie par l ’appel de la procédure « &calcul », le code de cette procédure est défini dans le programme (cf code complet)