Hi Lutz,
Thank you
Fabrice


2017-02-14 17:04 GMT+01:00 Lutz Haseloff <lutzi@toppkieker.net>:

> linecap:=butt ;
>
>
> Am 14. Februar 2017 16:53:04 MEZ schrieb Fabrice Couvreur <
> fabrice1.couvreur@gmail.com>:
>>
>> Hello,
>> In the code below, the red vertical line extends beyond the edges of the
>> cell.
>> Thank you
>> Fabrice
>>
>> \startuniqueMPgraphic{Vertical}
>>
>>   linecap:=squared ;
>>   path p ; p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ;
>>   drawoptions (withpen pencircle withcolor \MPcolor{red}) ;
>>   draw .5[llcorner p, lrcorner p]--.5[ulcorner p, urcorner p] ;
>>   setbounds currentpicture to p ;
>>
>> \stopuniqueMPgraphic
>>
>> \defineoverlay[Vertical][\uniqueMPgraphic{Vertical}]
>>
>> \startsetups[table:initialize]
>>
>> \setupTABLE[start]
>>            [align={middle,lohi},offset=0.5ex,width=1.5cm,
>>             foregroundstyle={\switchtobodyfont[10pt]}]
>> \setupTABLE[1][2][background=Vertical]
>>
>> \stopsetups
>>
>> \starttext
>> \startlinecorrection[blank]
>>   \startmidaligned
>>     \bTABLE[setups=table:initialize]
>>     \bTR
>>     \bTD \math{\red 0 {\rm (A)}} \eTD
>>     \bTD \math{+\infty}          \eTD
>>     \eTR
>>     \bTR
>>     \bTD                         \eTD
>>     \bTD  \math{+\infty}         \eTD
>>     \eTR
>>     \eTABLE
>>   \stopmidaligned
>> \stoplinecorrection
>> \stoptext
>>
>
> --
> Diese Nachricht wurde von meinem Android-Mobiltelefon mit K-9 Mail
> gesendet.
>
> ____________________________________________________________
> _______________________
> 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://context.aanhet.net
> archive  : https://bitbucket.org/phg/context-mirror/commits/
> wiki     : http://contextgarden.net
> ____________________________________________________________
> _______________________
>