Henning Hraban Ramm wrote:


I'm thinking about utilizing border fonts and how to make automatic frames for use with \framed (I guess that's still too hard for me, but let's see...)


think backgrounds and leaders:

\def\Border#1#2#3#4#5#6#7#8%
 {\vbox to \overlayheight \bgroup
    \offinterlineskip
    \setbox0=\hbox to \overlaywidth \bgroup
       #1\cleaders\hbox{#2}\hfill#3%
    \egroup
    \setbox2=\hbox to \overlaywidth \bgroup
       #5\cleaders\hbox{#6}\hfill#7%
    \egroup
    \scratchdimen\dimexpr\overlayheight-2\ht0\relax
    \setbox4=\vbox to \scratchdimen \bgroup
       \cleaders\hbox{#8}\vfill
    \egroup
    \setbox6=\vbox to \scratchdimen \bgroup
       \cleaders\hbox{#4}\vfill
    \egroup
    \box0
    \hbox to \overlaywidth{\box4\hfill\box6}%
    \box2
  \egroup}

\def\FakeChar#1{\framed[width=.5cm,height=.5cm,offset=overlay]{#1}}

\defineoverlay
 [border]
 [\Border
   {\FakeChar{\tx LT}}
   {\FakeChar{t}}
   {\FakeChar{\tx RT}}
   {\FakeChar{r}}
   {\FakeChar{\tx RB}}
   {\FakeChar{b}}
   {\FakeChar{\tx LB}}
   {\FakeChar{l}}]

\starttext

\framed[width=4cm,height=3cm,background=border]{}

\stoptext

if needed i can add something like Border to supp-fun or so ...

probably some scaling is involved as well

Hans
_______________________________________________
ntg-context mailing list
[email protected]
http://www.ntg.nl/mailman/listinfo/ntg-context

Reply via email to