Setting the pen position in a *WINDOW*

[rodney@huntsai.boeing.com (Rodney Daughtrey)]

I'm trying to build a window (of class *WINDOW* and type
:SINGLE-EDGE-BOX) with a text string in the upper left corner.
I want to shadow VIEW-DRAW-CONTENTS to redraw the text when the window
gets moved, but I can't set the pen position for the window.
Is there any way to set the pen position in a window of type *WINDOW*,
or can someone suggest a better way to implement "titled" *WINDOW*s
in which the text in the upper left hand corner of the window is
redrawn when the window is moved (without using dialogs)?

Rodney Daughtrey           E-mail: rodney@huntsai.boeing.com
Huntsville AI Center               {major site}!uw-beaver!bcsaic!huntsai!rodney
Boeing Computer Services   Voice:  (205)-461-2352  Fax: (205)-461-2933