From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/516
Path: main.gmane.org!not-for-mail
From: David Arnold <darnold@northcoast.com>
Newsgroups: gmane.comp.tex.context
Subject: Slow progress today
Date: Fri, 04 Jun 1999 23:49:40 -0700
Sender: owner-ntg-context@let.uu.nl
Message-ID: <3.0.5.32.19990604234940.00854100@mail.northcoast.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
X-Trace: main.gmane.org 1035391368 24626 80.91.224.250 (23 Oct 2002 16:42:48 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 16:42:48 +0000 (UTC)
Original-To: ntg-context@ntg.nl
Xref: main.gmane.org gmane.comp.tex.context:516
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:516

Hi,

Working in Up-001-s.pdf, I still can't get this to show anything. How do I
get the three green edit boxes shown in Up-001.pdf?

%output=pdf

\setupinteraction
  [state=start]

\setupcolors
  [state=start]

\definemainfield [MainMail][line][ShortLine][][darnold@northcoast.com]

\def\MPnormalbutton#1#2#3%
 {\startreusableMPgraphic{nb:#1:#2:#3}
   input mp-tool;
   pickup pencircle scaled 3;
   fill fullcircle xscaled #1 yscaled #2 withcolor (.8,.8,.8);
   draw fullcircle xscaled #1 yscaled #2 withcolor \MPcolor{#3};
 \stopreusableMPgraphic
 \reuseMPgraphic{nb:#1:#2:#3}}

\defineoverlay
 [normalbutton]
 [\MPnormalbutton\overlaywidth\overlayheight\overlaycolor]

\setupfield
 [LeftLine]
 [background=normalbutton,
  backgroundcolor=darkgreen,
  offset=2ex,
  height=7ex,
  width=.25\hsize,
  style=type,
  frame=off,
  align=left]
\setupfield
 [MiddleLine]
 [background=normalbutton,
  backgroundcolor=darkgreen,
  offset=2ex,
  height=7ex,
  width=.25\hsize,
  style=type,
  frame=off,
  align=middle]
\setupfield
 [RightLine]
 [background=normalbutton,
  backgroundcolor=darkgreen,
  offset=2ex,
  height=7ex,
  width=.25\hsize,
  style=type,
  frame=off,
  align=right]

\clonefield [MainMail] [LeftMail] [LeftLine]

\clonefield [MainMail] [MiddleMail] [MiddleLine]

\clonefield [MainMail] [RightMail] [RightLine]

\tracefieldstrue

\showfields[MainMail,LeftMail,MiddleMail,RightMail,LeftLine,MiddleLine,Right
Line]

\starttext

Hello, cruel world!

\field[LeftLine]

\stoptext