Left border of a rectangle (Metafun)
![](https://secure.gravatar.com/avatar/d7c3317235884569312c31f786d43bbc.jpg?s=120&d=mm&r=g)
Hi, I want to draw the left border of the rectangle, but it is drawn in the middle. Why ? Thank you, Fabrice \setupcolors[state=start] \definecolor[MyColorA][c=0.3, m=0.00, y=0.00, k=0.05] \defineoverlay [Funny] [\useMPgraphic{Funny}] \startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw ulcorner p--llcorner p ; \stopuseMPgraphic \defineframedtext [Methode] [before={\blank}, after={\blank}, frame=off, background=Funny, width=\textwidth, height=fit] \starttext \startMethode \input knuth \stopMethode \stoptext
![](https://secure.gravatar.com/avatar/5faea8b4fa0adb143383811dc94f0d22.jpg?s=120&d=mm&r=g)
Hi fabrice, I dont’t know whether this the best solution, but you can use the following definition of the MPgraphic Funny: \startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw lrcorner p --urcorner p --ulcorner p withcolor white; draw ulcorner p --llcorner p ; \stopuseMPgraphic If necessary, you can use a backgroundcolor instead of white for the part of the path p which is to be invisible. Best regards: OK
On 29 Aug 2015, at 10:56, Fabrice Couvreur
wrote: Hi, I want to draw the left border of the rectangle, but it is drawn in the middle. Why ? Thank you, Fabrice
\setupcolors[state=start]
\definecolor[MyColorA][c=0.3, m=0.00, y=0.00, k=0.05]
\defineoverlay [Funny] [\useMPgraphic{Funny}]
\startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw ulcorner p--llcorner p ; \stopuseMPgraphic
\defineframedtext [Methode] [before={\blank}, after={\blank}, frame=off, background=Funny, width=\textwidth, height=fit]
\starttext
\startMethode \input knuth \stopMethode
\stoptext ___________________________________________________________________________________ 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 ___________________________________________________________________________________
![](https://secure.gravatar.com/avatar/49e63acb01f2ca80efce7eed08310ce8.jpg?s=120&d=mm&r=g)
On 8/29/2015 1:11 PM, Otared Kavian wrote:
Hi fabrice,
I dont’t know whether this the best solution, but you can use the following definition of the MPgraphic Funny:
\startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw lrcorner p --urcorner p --ulcorner p withcolor white; draw ulcorner p --llcorner p ;
\stopuseMPgraphic
\startuseMPgraphic{Funny} interim linecap := butt ; draw leftboundary OverlayBox ; setbounds currentpicture to OverlayBox ; \stopuseMPgraphic ----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com | www.pragma-pod.nl -----------------------------------------------------------------
![](https://secure.gravatar.com/avatar/d7c3317235884569312c31f786d43bbc.jpg?s=120&d=mm&r=g)
Hi,
Hans Otared and thank you for your suggestions.
A question for Hans : why my code does not give the expected result ?
Fabrice
2015-08-29 13:35 GMT+02:00 Hans Hagen
On 8/29/2015 1:11 PM, Otared Kavian wrote:
Hi fabrice,
I dont’t know whether this the best solution, but you can use the following definition of the MPgraphic Funny:
\startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw lrcorner p --urcorner p --ulcorner p withcolor white; draw ulcorner p --llcorner p ;
\stopuseMPgraphic
\startuseMPgraphic{Funny} interim linecap := butt ; draw leftboundary OverlayBox ; setbounds currentpicture to OverlayBox ; \stopuseMPgraphic
----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com | www.pragma-pod.nl -----------------------------------------------------------------
___________________________________________________________________________________ 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
___________________________________________________________________________________
![](https://secure.gravatar.com/avatar/5faea8b4fa0adb143383811dc94f0d22.jpg?s=120&d=mm&r=g)
Hi Fabrice, Your code works if you add setbounds currentpicture to OverlayBox ; Indeed with this Metapost determines the boundaries of the rectangle of which you draw the left side. Best regards: OK
On 30 Aug 2015, at 09:50, Fabrice Couvreur
wrote: Hi, Hans Otared and thank you for your suggestions. A question for Hans : why my code does not give the expected result ? Fabrice
2015-08-29 13:35 GMT+02:00 Hans Hagen
mailto:pragma@wxs.nl>: On 8/29/2015 1:11 PM, Otared Kavian wrote: Hi fabrice, I dont’t know whether this the best solution, but you can use the following definition of the MPgraphic Funny:
\startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw lrcorner p --urcorner p --ulcorner p withcolor white; draw ulcorner p --llcorner p ;
\stopuseMPgraphic
\startuseMPgraphic{Funny} interim linecap := butt ; draw leftboundary OverlayBox ; setbounds currentpicture to OverlayBox ; \stopuseMPgraphic
----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com http://www.pragma-ade.com/ | www.pragma-pod.nl http://www.pragma-pod.nl/ -----------------------------------------------------------------
___________________________________________________________________________________ If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl mailto:ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context http://www.ntg.nl/mailman/listinfo/ntg-context webpage : http://www.pragma-ade.nl http://www.pragma-ade.nl/ / http://tex.aanhet.net http://tex.aanhet.net/ archive : http://foundry.supelec.fr/projects/contextrev/ http://foundry.supelec.fr/projects/contextrev/ wiki : http://contextgarden.net http://contextgarden.net/ ___________________________________________________________________________________
___________________________________________________________________________________ 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 ___________________________________________________________________________________
![](https://secure.gravatar.com/avatar/5faea8b4fa0adb143383811dc94f0d22.jpg?s=120&d=mm&r=g)
Hi Fabrice, You can also use the following simpler method: %%%%% begin leftframe.tex \definecolor[MyColorA][c=0.3, m=0.00, y=0.00, k=0.05] \defineframedtext [MethodeB] [before={\blank}, after={\blank}, frame=off, leftframe=on, framecolor=MyColorA, rulethickness=6.5pt, width=\textwidth, height=fit] \starttext \startMethodeB \input knuth \stopMethodeB \stoptext %%%%% end leftframe.tex Best regards: OK
On 29 Aug 2015, at 10:56, Fabrice Couvreur
wrote: Hi, I want to draw the left border of the rectangle, but it is drawn in the middle. Why ? Thank you, Fabrice
\setupcolors[state=start]
\definecolor[MyColorA][c=0.3, m=0.00, y=0.00, k=0.05]
\defineoverlay [Funny] [\useMPgraphic{Funny}]
\startuseMPgraphic{Funny} interim linecap := butt ; path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ; drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ; draw ulcorner p--llcorner p ; \stopuseMPgraphic
\defineframedtext [Methode] [before={\blank}, after={\blank}, frame=off, background=Funny, width=\textwidth, height=fit]
\starttext
\startMethode \input knuth \stopMethode
\stoptext ___________________________________________________________________________________ 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 ___________________________________________________________________________________
participants (3)
-
Fabrice Couvreur
-
Hans Hagen
-
Otared Kavian