Round-corner textbox with shadow

15 Aug 2009

      Shadows on round-corner textboxes are producing square-corner shaded boxes
with square-corner shadows. The following code illustrates the problem and
should run asis. 

\def\Demos{

\startuniqueMPgraphic{shadow}
fill OverlayBox shifted (4pt,-4pt) withcolor .8white ;
fill OverlayBox withcolor .8white ;
draw OverlayBox withcolor black ;
setbounds currentpicture to OverlayBox ;
\stopuniqueMPgraphic
\defineoverlay [shadow] [\uniqueMPgraphic{shadow}]

\setupcolors[state=start]
\startframedtext[
 height=fit,
 width=\textwidth,
 location=inmargin ,
 align=low,
 frame=on,
% framecolor=black,
 framecorner=round,
 frameradius=.0625 in,
 background=shadow, %substitute screen for shadow and get clean box BUT no
shadow
 backgroundscreen=0.9,
 backgroundcorner=round,
 backgroundradius=.0625 in,
 bodyfont=9pt,
 offset=0.05 in
]
\setuptables[distance=small,bodyfont={9pt,sansserif}]

\starttable[s1|Br|o4l|Br|l|]
 \NC Name:    \NC \getvariable{Book:Demos}{name} 
 \NC Nickname: \NC \getvariable{Book:Demos}{nickname} \NC\AR
 \NC DOB:     \NC \getvariable{Book:Demos}{dob}           
 \NC Height:   \NC \getvariable{Book:Demos}{height}     \NC\AR
 \NC Weight:  \NC \getvariable{Book:Demos}{weight}                 
 \NC Age:      \NC  \getvariable{Book:Demos}{age}               \NC\AR
 \NC Tribe:   \NC \getvariable{Book:Demos}{tribe}                 
 \NC Home:     \NC \getvariable{Book:Demos}{home}  \NC\AR
 \NC Parents: \NC \THREE \getvariable{Book:Demos}{parents}        \NC\AR
 \doifnot {\getvariable{Book:Demos}{parentsextra}}{}{\NC          \NC \THREE
\getvariable{Book:Demos}{parentsextra} \NC\AR}
\stoptable
\starttable[s1|Br|l|]
 \NC Early Schooling: \NC \getvariable{Book:Demos}{earlyschooling}  \NC\AR
 \doifnot {\getvariable{Book:Demos}{laterschooling}}{}{\NC Later Schooling:
\NC \getvariable{Book:Demos}{laterschooling}  \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors1}}{}{\NC Honors:          \NC
\getvariable{Book:Demos}{honors1} \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors2}}{}{\NC                  \NC
\getvariable{Book:Demos}{honors2} \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors3}}{}{\NC                  \NC
\getvariable{Book:Demos}{honors3} \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors4}}{}{\NC                  \NC
\getvariable{Book:Demos}{honors4} \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors5}}{}{\NC                  \NC
\getvariable{Book:Demos}{honors5} \NC\AR}
 \doifnot {\getvariable{Book:Demos}{honors6}}{}{\NC                  \NC
\getvariable{Book:Demos}{honors6} \NC\AR}
\stoptable
\stopframedtext
}

\starttext

\setvariables[Book:Demos]
 [name={Glenn Scobey Warner},
  nickname={Pop, The Old Fox},
  dob={4/5/1871},
  height={6'0"},
  weight={205},
  age={},
  tribe={N/A},
  home={Springville, NY},
  parents={William H. Warner, Adaline Scobey},
  parentsextra={},
  earlyschooling={Griffith Instatute},
  laterschooling={Cornell University},
  honors1={College Football Hall of Fame, Charter Member, 1951},
  honors2={Helm's Athletic Foundation Hall of Fame, 1951},
  honors3={Stanford Athletic Hall of Fame},
  honors4={Greater Buffalo Hall of Fame, 2001},
  honors5={},
  honors6={}
 ]

\Demos

\stoptext

Tom Benjey
717-258-9733 voice
717-243-0074 fax
Twitter: @TomBenjey

Football player w C small

Tom

Peter Rolf

Hans Hagen

tags

participants (3)