Re: changement de formes avec shape
[ Nouvelle discussion
| Répondre au groupe
|
fr.comp.lang.tcl ]
Sujet: Re: changement de formes avec shape
De: david.co...@gmail.com (david cobac)
Groupes: fr.comp.lang.tcl
Organisation: Guest of ProXad - France
Date: 13. May 2008, 14:39:17
References: 1 2
|
Eric Hassold <hassold@evolane.com> a écrit :
>Bonjour,
>
>[...] Cette variante de la procedure t, qui
>applique le masque, semble marcher a premiere vue:
>
>proc t {fen icone {xoff 0} {yoff 0}} {
> shape set $fen photo $icone
> shape offset $fen $xoff $yoff
>}
>
>Eric
Bonjour et merci Éric pour la réponse,
effectivement, la petite icône est maintenant parfaitement visible,
néanmoins, la réduction ne semble pas se faire par rapport au centre du
disque de l'icône et ce malgrè des essais de offset... comportement
étrange sachant que rien ne change au niveau de la position de l'image
dans le canvas.
De plus, en arrivant lentement à la limite de l'icône, on peut observer
un effet de <Enter>/<Leave> assez désagréable qui n'apparaît évidemment
pas si on place d'abord la petite pour faire apparaître la grande dans
l'entrée. D'ailleurs, il me semble que le bind avec le rectangle devient
ici parfaitement inutile puisque la 'shape' s'applique à l'icône. Mais
au final, c'est peut-être plus logique en arrivant sur une icône de
l'agrandir que de la rétrécir !
encore merci,
david

|
 cette fonctionnalité est reservée aux membres ayant une session active !
|