ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Hans Hagen <pragma@wxs.nl>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: Question about \startcombination \stopcombination
Date: Thu, 18 Aug 2016 19:46:28 +0200	[thread overview]
Message-ID: <9eecfcfc-8826-6b57-1105-62d993a1c3f9@wxs.nl> (raw)
In-Reply-To: <CACyK-eoJp_tcuwn_Cht40kxpgpM0TcJ78pr-=wHhS7uN3=Q8yQ@mail.gmail.com>

On 8/18/2016 7:12 PM, Fabrice Couvreur wrote:
> Hello,
> The use of \startcombination ... \stopcombination does not work with my
> environment, I do not get all framed but only two and four
> Thank you
> Fabrice
>
> #########################################################
> \definecolor[MyColorA][r=0.8784, g=0.8784, b=0.8784]
>
> \defineframedtext
>   [MyFrame]
>   [before={\blank},
>    after={\blank},
>    frame=off,
>    background=MyFrame,
>    width=6cm,
>    height=fit,
>    style=small]
>
> \startuseMPgraphic{MyFrame}
>  path b;
>  picture p;
>  p := textext.rt("\tfx\white\framedtextparameter{Title}");
>  p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight);
>  b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ;
>  fill OverlayBox withcolor \MPcolor{MyColorA};
>  fill b withcolor darkred ;
>  draw p;
>  setbounds currentpicture to boundingbox currentpicture enlarged 2mm ;
> \stopuseMPgraphic
>
> \defineoverlay
>   [MyFrame]
>   [\useMPgraphic{MyFrame}]
>
> \starttext
>
> \startlinecorrection[blank]
> \startmidaligned
> \startcombination[2*2]
> {\startMyFrame[Title=ALGO A]
>  One
>  \stopMyFrame}{}
> {\startMyFrame[Title=ALGO B]
> Two
> \stopMyFrame}{}
> {\startMyFrame[Title=ALGO C]
> Three
> \stopMyFrame}{}
> {\startMyFrame[Title=ALGO D]
> Four
> \stopMyFrame}{}
> \stopcombination
> \stopmidaligned
> \stoplinecorrection
>
> \stoptext
> #########################################################

\definecolor[MyColorA][r=0.8784, g=0.8784, b=0.8784]

\defineframedtext
   [MyFrame]
   [frame=off,
    background=MyFrame,
    width=6cm,
    height=fit,
    style=small]

\startuseMPgraphic{MyFrame}
     path b;
     picture p;
     p := textext.rt("\tfx\white\framedtextparameter{Title}");
     p := p shifted (2BodyFontSize,OverlayHeight-ypart center 
p+.25ExHeight);
     b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ;
     fill OverlayBox withcolor "MyColorA" ;
     fill b withcolor darkred ;
     draw p ;
     setbounds currentpicture to boundingbox currentpicture enlarged 2mm ;
\stopuseMPgraphic

\defineoverlay
   [MyFrame]
   [\useMPgraphic{MyFrame}]

\starttext

     \startcombination[2*2]
         {\MyFrame[Title=ALGO A]{One}}   {}
         {\MyFrame[Title=ALGO B]{Two}}   {}
         {\MyFrame[Title=ALGO C]{Three}} {}
         {\MyFrame[Title=ALGO D]{Four}}  {}
     \stopcombination

\stoptext

the start/stop variant ignores the width

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
        tel: 038 477 53 69 | www.pragma-ade.nl | 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
___________________________________________________________________________________

  reply	other threads:[~2016-08-18 17:46 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-08-18 17:12 Fabrice Couvreur
2016-08-18 17:46 ` Hans Hagen [this message]
2016-08-18 18:15   ` Fabrice Couvreur
2016-08-18 18:31     ` Mohammad Hossein Bateni
2016-08-18 21:59       ` Hans Hagen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=9eecfcfc-8826-6b57-1105-62d993a1c3f9@wxs.nl \
    --to=pragma@wxs.nl \
    --cc=ntg-context@ntg.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).