ASTUCES TCL TK

Voici des astuces simples et rapides pour programmer en TK.

Au fur et à mesure de l'évolution de mon apprentissage de tcltk, j'en ajouterai.

Comment faire pour:

Il suffit de créer un évènement clic sur la fenêtre principale qui renverra le nomo du widget cliqué comme ceci :

bind . <Button-1> {
    set w [winfo containing %X %Y]
    puts "Vous avez cliqué sur $w"
}

Si vous voulez lancer un script tcl tk en double cliquant sur son icone dans votre explorateur de fichiers thunar, dolphin, nautilus ou autre, il vous suffit simplement de faire deux choses :

1. Rendre votre script exécutable par la commande chmod
2. Ajouter la ligne : #!/usr/bin/wish au début de votre script