Re: [NTG-context] Space between both environments

2015-09-12 Thread Fabrice Couvreur
Hi Wolfgang,
Thank you for your help, it works fine.
Fabrice

2015-09-08 20:24 GMT+02:00 Wolfgang Schuster :

> Fabrice Couvreur 
> 8. September 2015 18:29
> Hi,
> @Otared I accept your answer until I can not fix my code, thank you.
>
> A better solution is to increase the space before each environment because
> the part of the title which sticks out of the box does not exist for TeX.
>
> Changing the before value to “before={\blank[line,halfline]}” should be
> enough.
>
> @Woffgang  I have to change the code (how ?) because I realize that the
> text of the second environment exceeds the frame (if you draw it).
>
> Add
>
> maxwidth=\availablehsize,
>
> to your column setup.
>
> 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
___

Re: [NTG-context] Space between both environments

2015-09-08 Thread Fabrice Couvreur
Hi,
@Otared I accept your answer until I can not fix my code, thank you.

@Woffgang  I have to change the code (how ?) because I realize that the text of
the second environment exceeds the frame (if you draw it).

2015-09-07 21:02 GMT+02:00 Wolfgang Schuster :

> Fabrice Couvreur 
> 7. September 2015 19:35
> Hi,
> I can not insert a space between my two environments.
>
> There is a space but you can’t see it because the colored background of
> your frames is placed too low (you can see it when you use "frame=on").
>
> Thank you.
> Fabrice
>
> % macros=mkvi
>
> \setupcolors[state=start]
>
>
> \definecolor[MyColorA][c=0.00, m=0.10, y=0.20, k=0.00]
>
> \definecolor[MyColorB][c=0.00, m=0.62, y=1.00, k=0.00]
>
> \definecolor[MyColorC][c=0.3, m=0.00, y=0.00, k=0.05]
>
> \definecolor[MyColorD][c=0.6, m=0.00, y=0.00, k=0.10]
>
>
> \defineframedtext
>   [MyDefinition]
>   [before={\blank},
>after={\blank},
>frame=off,
>background=MyFrame,
>width=\textwidth,
>height=fit,
>location=left,
>style=italic]
>
> \defineoverlay
>   [MyFrame]
>   [\useMPgraphic{MyFrame}]
>
> \definelabel
>   [Définition]
>   [headstyle=\bf\smallcaps]
>
> \startuseMPgraphic{MyFrame}
> path b ;
> picture p ;
> p := textext.rt("\white\Définition") ;
> p := p shifted (2BodyFontSize,OverlayHeight-ypart center
> p+.25ExHeight) ;
> b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ;
> fill OverlayBox withcolor \MPcolor{MyColorA} ;
> fill b withcolor \MPcolor{MyColorB} ;
> draw p ;
>
> setbounds currentpicture to OverlayBox ;
>
> \stopuseMPgraphic
>
> 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
___

Re: [NTG-context] Space between both environments

2015-09-08 Thread Wolfgang Schuster

Fabrice Couvreur 
8. September 2015 18:29
Hi,
@Otared I accept your answer until I can not fix my code, thank you.
A better solution is to increase the space before each environment 
because the part of the title which sticks out of the box does not exist 
for TeX.


Changing the before value to “before={\blank[line,halfline]}” should be 
enough.
@Woffgang I have to change the code (how ?) because I realize that the 
text of the second environment exceeds the frame (if you draw it).

Add

maxwidth=\availablehsize,

to your column setup.

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
___

Re: [NTG-context] Space between both environments

2015-09-07 Thread Otared Kavian
Hi Fabrice,

You can use
after={\strut\blank}

in your definition of MyDefinition, as in:

\defineframedtext
  [MyDefinition]
  [before={\blank},
   after={\strut\blank},
   frame=off,
   background=MyFrame,
   width=\textwidth,
   height=fit,
   location=left,
   style=italic]

Best regards: OK

> On 07 Sep 2015, at 19:35, Fabrice Couvreur  
> wrote:
> 
> Hi,
> I can not insert a space between my two environments.
> Thank you.
> Fabrice
> 
> % macros=mkvi
> 
> \setupcolors[state=start]
> 
> 
> \definecolor[MyColorA][c=0.00, m=0.10, y=0.20, k=0.00]  
> 
> \definecolor[MyColorB][c=0.00, m=0.62, y=1.00, k=0.00]
> 
> \definecolor[MyColorC][c=0.3, m=0.00, y=0.00, k=0.05]
> 
> \definecolor[MyColorD][c=0.6, m=0.00, y=0.00, k=0.10]
> 
> 
> \defineframedtext
>   [MyDefinition]
>   [before={\blank},
>after={\blank},
>frame=off,
>background=MyFrame,
>width=\textwidth,
>height=fit,
>location=left,
>style=italic]
> 
> \defineoverlay
>   [MyFrame]
>   [\useMPgraphic{MyFrame}]
> 
> \definelabel
>   [Définition]
>   [headstyle=\bf\smallcaps]
> 
> \startuseMPgraphic{MyFrame}
> path b ;
> picture p ;
> p := textext.rt("\white\Définition") ; 
> p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight) ;
> b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ;
> fill OverlayBox withcolor \MPcolor{MyColorA} ;
> fill b withcolor \MPcolor{MyColorB} ;
> draw p ;
> \stopuseMPgraphic
> 
> 
> \definemixedcolumns
>   [myColumn]
>   [n=2, 
>separator=rule,
>rulecolor=MyColorC,
>rulethickness=1pt,
>balance=yes]
> 
> \setupalign[verytolerant,stretch,hanging]
> 
> 
> \defineoverlay
>   [Funny]
>   [\useMPgraphic{Funny}]
> 
> \definelabel
>   [MÉTHODE]
>   [headstyle=\bf\smallcaps]
> 
> \startuseMPgraphic{Funny}
> interim linejoin := mitered ;
> interim linecap := squared ;
> path b ;
> picture p ;
> p := textext.rt("\white\MÉTHODE") ; 
> p := p shifted (0,OverlayHeight) ;
> b := boundingbox p ;
> drawoptions (withpen pencircle scaled 3mm withcolor \MPcolor{MyColorC}) ;
> draw leftboundary OverlayBox ;
> fill b withcolor \MPcolor{MyColorD} ;
> draw p ;
> setbounds currentpicture to OverlayBox ;
> \stopuseMPgraphic
> 
> \defineframedtext
>   [Methode]
>   [before={\blank},
>after={\blank},
>frame=off,
>background=Funny,
>width=\textwidth,
>height=fit,
>]
> 
> 
> 
> \starttext
> 
> \startMyDefinition
> \input knuth
> \stopMyDefinition
> 
> \startMethode
> 
> \startmyColumn
> 
> \input ward
> 
> \column
> \input knuth
> \stopmyColumn
> 
> 
> \stopMethode
> \stopsection
> \stopchapter
> \stoppart
> \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
___

Re: [NTG-context] Space between both environments

2015-09-07 Thread Wolfgang Schuster

Fabrice Couvreur 
7. September 2015 19:35
Hi,
I can not insert a space between my two environments.
There is a space but you can’t see it because the colored background of 
your frames is placed too low (you can see it when you use "frame=on").

Thank you.
Fabrice

% macros=mkvi

\setupcolors[state=start]


\definecolor[MyColorA][c=0.00, m=0.10, y=0.20, k=0.00]

\definecolor[MyColorB][c=0.00, m=0.62, y=1.00, k=0.00]

\definecolor[MyColorC][c=0.3, m=0.00, y=0.00, k=0.05]

\definecolor[MyColorD][c=0.6, m=0.00, y=0.00, k=0.10]


\defineframedtext
  [MyDefinition]
  [before={\blank},
   after={\blank},
   frame=off,
   background=MyFrame,
   width=\textwidth,
   height=fit,
   location=left,
   style=italic]

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

\definelabel
  [Définition]
  [headstyle=\bf\smallcaps]

\startuseMPgraphic{MyFrame}
path b ;
picture p ;
p := textext.rt("\white\Définition") ;
p := p shifted (2BodyFontSize,OverlayHeight-ypart center 
p+.25ExHeight) ;

b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth ;
fill OverlayBox withcolor \MPcolor{MyColorA} ;
fill b withcolor \MPcolor{MyColorB} ;
draw p ;

setbounds currentpicture to OverlayBox ;

\stopuseMPgraphic

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
___