Discussion :

[spheris]

Bonjour,
Débutant en Tcl tk, je me pose cette question.

Je peux lancer une procédure à l'appui d'un bouton de la souris de cette façon :

button .monbouton -width 11 -height 2 -text "quit" -command maprocedure

ce qui a pour effet de lancer
proc maprocedure {} {}
ça je comprends bien.

Mais comment simplement appeler une procédure directement au démarrage d'un script?
(J'ai fait une procédure que je réutilise plusieurs fois dans le programme)
Merci pour votre réponse.

[spheris]

Désolé du dérangement, j'ai trouvé :

Pour une procédure sans paramètre, il faut simplement l'appeler par son nom sans accolade
Pour une procédure avec des paramètres, il faut d'abord créer la procédure puis ensuite l'appeler par son nom et ses paramètres séparés par des espaces.
Tout simplement.

[Canvas]

Bonsoir,

Il existe un 3ième cas de figure qui peut parfois rendre service.
Une procédure peut être lancée avec des paramètres par défaut.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

proc Add {{x 1} {y 2}} { expr $x + $y }

Test:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
% Add 3 4
7
% Add 6
8
% Add
3

[Le Bertch]

Et encore mieux avec le mot clé args, on peut mettre ce que l'on veut !

proc procedure {args}
puts $args

%procedure toto tata titi
toto tata titi