diff options
| author | didier | 2007-11-09 09:00:31 +0000 |
|---|---|---|
| committer | didier | 2007-11-09 09:00:31 +0000 |
| commit | 9527480e75336a2dda3edf8fc17956e9c0a4dd59 (patch) | |
| tree | e172a60dae1b73f3b444bd97d7f68e89967f2394 /exemples/Strip.pm | |
| parent | a883c2f1dc85d564a8d94d8cf852dc12632a072f (diff) | |
| download | mtc-9527480e75336a2dda3edf8fc17956e9c0a4dd59.zip mtc-9527480e75336a2dda3edf8fc17956e9c0a4dd59.tar.gz mtc-9527480e75336a2dda3edf8fc17956e9c0a4dd59.tar.bz2 mtc-9527480e75336a2dda3edf8fc17956e9c0a4dd59.tar.xz | |
Mise a jour des exemples par rapport aux differentes evolutions de MTools.
Notamment pour les toggleButton...
Diffstat (limited to 'exemples/Strip.pm')
| -rw-r--r-- | exemples/Strip.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/exemples/Strip.pm b/exemples/Strip.pm index 59d800f..afe03c4 100644 --- a/exemples/Strip.pm +++ b/exemples/Strip.pm @@ -50,10 +50,12 @@ sub new { # de fixer ou non le strip (desactiver le comportement de mover) my $bouton1 = new MTools::Widget::MToggleBouton ( parent => $self, - g_on => 'strip.svg#alarme_on', - g_off => 'strip.svg#alarme_off', - e_press => 'ALARME_PRESS', - e_release => 'ALARME_RELEASE' + g_on1 => 'strip.svg#alarme_on', + g_off1 => 'strip.svg#alarme_off', + g_on2 => 'strip.svg#alarme_on', + g_off2 => 'strip.svg#alarme_off', + e_press1 => 'ALARME_PRESS', + e_release1 => 'ALARME_RELEASE' ); # Instanciation des objets textes situe sur la premiere partie du strip |