Thanks very much Wolfgang. Will try to play with this during this week.
On Wed, Jan 6, 2010 at 6:54 AM, Wolfgang Schuster
<schuster.wolfg...@googlemail.com> wrote:
>
> Am 05.01.2010 um 04:02 schrieb Curiouslearn:
>
>> Thanks Wolfgang. I am not yet proficient enough in Metapost or Context
>> to understand your code. But will look at it more carefully later.
>>
>> Meanwhile, is there any further work going on on Natural Tables? Are
>> there plans to introduce the ability to have borders of different
>> thickness for the same cell through simple options.
>
>
> A TeX based solution won't be possible without Hans but you can set
> the values in TeX (\framed, \setupTABLE) and use them in MetaPost.
>
> The following example show you what can be done.
>
> \unprotect
>
> \startuseMPgraphic{tableborder}
>
> %linecap := butt ;
>
> numeric FrameOffset, LeftRuleThickness, RightRuleThickness, TopRuleThickness,
> BottomRuleThickness ;
>
> FrameOffset := \frameddimension{frameoffset} ;
> LeftRuleThickness := \frameddimension{leftrulethickness} ;
> RightRuleThickness := \frameddimension{rightrulethickness} ;
> TopRuleThickness := \frameddimension{toprulethickness} ;
> BottomRuleThickness := \frameddimension{bottomrulethickness} ;
>
> pair lt, rt, lb, rb ;
>
> lt = (FrameOffset/2,OverlayHeight-FrameOffset/2) ;
> rt = (OverlayWidth-FrameOffset/2,OverlayHeight-FrameOffset/2) ;
> lb = (FrameOffset/2,FrameOffset/2) ;
> rb = (OverlayWidth-FrameOffset/2,FrameOffset/2) ;
>
> draw lt--rt withpen pencircle scaled TopRuleThickness ;
> draw lb--rb withpen pencircle scaled BottomRuleThickness ;
> draw lb--lt withpen pencircle scaled LeftRuleThickness ;
> draw rb--rt withpen pencircle scaled RightRuleThickness ;
>
> setbounds currentpicture to OverlayBox ;
>
> \stopuseMPgraphic
>
> \defineoverlay
> [tableborder]
> [%\edef\topframeparameter {\framedparameter\c!topframe }%
> %\edef\bottomframeparameter{\framedparameter\c!bottomframe}%
> %\edef\leftframeparameter {\framedparameter\c!leftframe }%
> %\edef\rightframeparameter {\framedparameter\c!rightframe }%
> \useMPgraphic{tableborder}]
>
> \setupTABLE
> [ toprulethickness=\framedparameter{rulethickness},
> bottomrulethickness=\framedparameter{rulethickness},
> leftrulethickness=\framedparameter{rulethickness},
> rightrulethickness=\framedparameter{rulethickness},
> % topframe=on,
> % bottomframe=on,
> % leftframe=on,
> % rightframe=on,
> background=tableborder,
> frame=off]
>
> \protect
>
> \starttext
>
> \start
>
> \setupTABLE[y][1][bottomrulethickness=2pt]
> \setupTABLE[3][3][bottomrulethickness=2pt,rightrulethickness=2pt]
> \setupTABLE[1][3][bottomframe=off]
>
> \bTABLE
> \bTR
> \bTD 1 \eTD
> \bTD 2 \eTD
> \bTD 3 \eTD
> \eTR
> \bTR
> \bTD 4 \eTD
> \bTD 5 \eTD
> \bTD 6 \eTD
> \eTR
> \bTR
> \bTD 7 \eTD
> \bTD 8 \eTD
> \bTD 9 \eTD
> \eTR
> \eTABLE
>
> \stop
>
> \stoptext
>
> 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
> ___________________________________________________________________________________
>
___________________________________________________________________________________
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
___________________________________________________________________________________
