Hi,
@Otared I accept your answer until I can not fix my code, thank you.
@Woffgang I have to change the code (how ?) because I realize that the text of
the second environment exceeds the frame (if you draw it).
2015-09-07 21:02 GMT+02:00 Wolfgang Schuster
Fabrice Couvreur
7. September 2015 19:35 Hi, I can not insert a space between my two environments. There is a space but you can’t see it because the colored background of your frames is placed too low (you can see it when you use "frame=on").
Thank you. Fabrice
% macros=mkvi
\setupcolors[state=start]
\definecolor[MyColorA][c=0.00, m=0.10, y=0.20, k=0.00]
\definecolor[MyColorB][c=0.00, m=0.62, y=1.00, k=0.00]
\definecolor[MyColorC][c=0.3, m=0.00, y=0.00, k=0.05]
\definecolor[MyColorD][c=0.6, m=0.00, y=0.00, k=0.10]
\defineframedtext [MyDefinition] [before={\blank}, after={\blank}, frame=off, background=MyFrame, width=\textwidth, height=fit, location=left, style=italic]
\defineoverlay [MyFrame] [\useMPgraphic{MyFrame}]
\definelabel [Définition] [headstyle=\bf\smallcaps]
\startuseMPgraphic{MyFrame} path b ; picture p ; p := textext.rt("\white\Définition") ; p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight) ; b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ; fill OverlayBox withcolor \MPcolor{MyColorA} ; fill b withcolor \MPcolor{MyColorB} ; draw p ;
setbounds currentpicture to OverlayBox ;
\stopuseMPgraphic
Wolfgang
___________________________________________________________________________________ If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context webpage : http://www.pragma-ade.nl / http://tex.aanhet.net archive : http://foundry.supelec.fr/projects/contextrev/ wiki : http://contextgarden.net
___________________________________________________________________________________