[Squeak-fr] Positionnement des morphs : Layout et compagnie
Hilaire Fernandes
hilaire at ext.cri74.org
Lun 5 Juin 21:28:20 UTC 2006
En ajoutant listSpacing: #equal; ça peut aider, mais tu n'as pas la bordure
Hilaire
FERRERE Frédéric a écrit :
> Bonjour,
>
> Une petite question sur le positionnement des morphs.
>
> Je souhaite placer 3 morphs en ligne dans un morph plus grand (un
> tableau à 3 colonnes),
> de telle sorte que l'espace entre les morphs et les bordures soient égaux.
>
> La seule manière que j'ai trouvé pour réaliser ce placement est
> d'utiliser 4 morph "espace".
> Cette technique donne le résultat escompté mais existe t'il un moyen
> d'arriver au même résultat
> sans utiliser ces morphs supplémentaires ?
>
> Merci.
>
> | contener rect1 rect2 rect3 space1 space2 space3 space4 |
> contener := Morph new
> extent: 300 at 300;
> color: Color black;
> layoutPolicy: (TableLayout new);
> listDirection: #leftToRight;
> listCentering: #justified;
> wrapCentering: #center.
>
> space1 := Morph new
> hResizing: #spaceFill;
> color: Color transparent.
> space2 := Morph new
> hResizing: #spaceFill;
> color: Color transparent.
> space3 := Morph new
> hResizing: #spaceFill;
> color: Color transparent.
> space4 := Morph new
> hResizing: #spaceFill;
> color: Color transparent.
> rect1 := RectangleMorph new
> extent: 50 at 20;
> color: Color red.
> rect2 := RectangleMorph new
> extent: 50 at 20;
> color: Color blue.
> rect3 := RectangleMorph new
> extent: 50 at 20;
> color: Color green.
>
> contener addMorph: space1;
> addMorph: rect1 ;
> addMorph: space2;
> addMorph: rect2;
> addMorph: space3;
> addMorph: rect3;
> addMorph: space4;
> openInWorld.
>
>
> Cordialement,
>
> --
> Frédéric
> _______________________________________________
> Squeak-fr mailing list
> Squeak-fr at lists.squeakfoundation.org
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/squeak-fr
>
More information about the Squeak-fr
mailing list