MyColor is undefined and defaults to black.
Alan
On Mon, 16 Jul 2018 00:03:33 +0200
Fabrice Couvreur
Good evening, In the code below, I get frames filled in black ! Thank you Fabrice
\setupbodyfont [palatino,11pt]
\definecolor[MyColorB][c=0.00, m=0.62, y=1.00, k=0.00] \definecolor[MyColorA][.75(MyColorB,white)]
\defineframedtext [MyText] [frame=off, background=MyFrame, width=\textwidth, location=right]
\defineoverlay [MyFrame] [\useMPgraphic{MyFrame}]
\definelabel [Définition] [headstyle=\bf\smallcaps]
\startuseMPgraphic{MyFrame} picture p ; p := textext.rt(\MPstring{MyFrame}) ; p := p shifted (0,OverlayHeight-ypart center p) ; fill OverlayBox leftenlarged .1TextWidth withcolor \MPcolor{MyColor} ; fill boundingbox p withcolor \MPcolor{myColor} ; draw p withcolor white ; setbounds currentpicture to OverlayBox ; \stopuseMPgraphic
\starttext
\startMyText \input knuth \stopMyText
\startMyText \input knuth \stopMyText
\stoptext