diff options
| author | ribet | 2007-06-04 14:47:37 +0000 |
|---|---|---|
| committer | ribet | 2007-06-04 14:47:37 +0000 |
| commit | a23de8ad848853f772e934c9df7ece9ad2226ee8 (patch) | |
| tree | 372844e2eeb923ad872ae982471f3b78f5920bc0 /doc/manuel_utilisateur.txt | |
| parent | 5893c14e17f7731d77a4147e534c247d0989e7a1 (diff) | |
| download | mtc-a23de8ad848853f772e934c9df7ece9ad2226ee8.zip mtc-a23de8ad848853f772e934c9df7ece9ad2226ee8.tar.gz mtc-a23de8ad848853f772e934c9df7ece9ad2226ee8.tar.bz2 mtc-a23de8ad848853f772e934c9df7ece9ad2226ee8.tar.xz | |
Ajout de l'exemple d'utilisation du timer.
Diffstat (limited to 'doc/manuel_utilisateur.txt')
| -rw-r--r-- | doc/manuel_utilisateur.txt | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/doc/manuel_utilisateur.txt b/doc/manuel_utilisateur.txt index 6fdb202..6f24b6a 100644 --- a/doc/manuel_utilisateur.txt +++ b/doc/manuel_utilisateur.txt @@ -735,6 +735,19 @@ d'utiliser start/stop. *** start et stop ne modifient pas la propriété visible, est-ce normal ? *** il n'y a pas de fonction isRunning. Faut-il en ajouter une ? +Exemple d'utilisation : +use MTools; +use MTools::GUI::MRect; +use MTools::MTimer; +new MTools (800, 600, "Exemple de timer"); +my $rect = new MTools::GUI::MRect (1, 300, 100, 300, 50, -filled => 1); +my $timer = new MTools::MTimer(200, 1, \&switch); +$timer->start(); +mrun; +sub switch { + $rect->mconfigure(-visible => !$rect->mget("-visible")); +} + ptkdb, MState, MIvy, WacomAdapter 2.8 L'utilisation de TkZinc |