<div dir="ltr">Ah, so in that case, you certainly want to start with Matthias's suggestion, not mine.<div><br></div><div>Robby</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Sun, Sep 22, 2013 at 6:18 PM, Alan Johnsey <span dir="ltr"><<a href="mailto:a.johnsey@cox.net" target="_blank">a.johnsey@cox.net</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div lang="EN-US" link="blue" vlink="blue" style="word-wrap:break-word">
<div>
<p class="MsoNormal"><font color="navy" face="Arial"><span style="font-size:10.0pt;font-family:Arial;color:navy">I should have given a better explanation
of what I’m trying to accomplish. I’m trying to create an
outline/template for taking notes during the execution of a program, Most of
the contents of the window will come from the user either by typing directly or
by copying and pasting from information provided by the program, hence the
desire to use an editor-canvas%. Your earlier suggestion to simply use <u></u><u></u></span></font></p><div class="im">
<p class="MsoNormal"><font color="navy" face="Arial"><span style="font-size:10.0pt;font-family:Arial;color:navy"><u></u> <u></u></span></font></p>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(send t insert "Use this window for making notes" 10 10)<u></u><u></u></span></font></p>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div><p class="MsoNormal"><font face="Arial"><span style="font-size:10.0pt;font-family:Arial">to initialize the editor-canvas% works fine for this purpose,
but a canvas% doesn’t. I have some notion of later being able to modify
the content/format of such an “Intelligent Notepad” dynamically,
but I’m not there yet either in terms of overall design or of
understanding how to use the gui to accomplish this. Thanks for your help.<u></u><u></u></span></font></p>
<p class="MsoNormal"><font face="Arial"><span style="font-size:10.0pt;font-family:Arial"><u></u> <u></u></span></font></p>
<p class="MsoNormal"><font color="navy" face="Arial"><span style="font-size:10.0pt;font-family:Arial;color:navy"><u></u> <u></u></span></font></p>
<p class="MsoNormal"><font color="navy" face="Arial"><span style="font-size:10.0pt;font-family:Arial;color:navy"><u></u> <u></u></span></font></p>
<div>
<div class="MsoNormal" align="center" style="text-align:center"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">
<hr size="2" width="100%" align="center">
</span></font></div>
<p class="MsoNormal"><b><font face="Tahoma"><span style="font-size:10.0pt;font-family:Tahoma;font-weight:bold">From:</span></font></b><font face="Tahoma"><span style="font-size:10.0pt;font-family:Tahoma"> Matthias
Felleisen [mailto:<a href="mailto:matthias@ccs.neu.edu" target="_blank">matthias@ccs.neu.edu</a>] <br>
<b><span style="font-weight:bold">Sent:</span></b> Saturday, September 21, 2013
6:40 AM</span></font></p><div class="im"><font face="Tahoma"><br>
<b><span style="font-weight:bold">To:</span></b> Alan Johnsey<br>
<b><span style="font-weight:bold">Cc:</span></b> Racket Mailing List<br>
<b><span style="font-weight:bold">Subject:</span></b> Re: [racket] Using GUI
editor</font></div><u></u><u></u><p></p>
</div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">Robby means something like this:<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
<div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">#lang racket/gui<u></u><u></u></span></font></p>
</div><div class="im">
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define f (new frame% [label "Notes"] [width 400] [height
600]))<u></u><u></u></span></font></p>
</div>
</div><div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define my-canvas%<u></u><u></u></span></font></p>
</div><div class="im">
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (class canvas%<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (super-new)<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (define/override (on-char . x)<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (displayln x)<u></u><u></u></span></font></p>
</div>
</div><div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (define dc (send this get-dc))<u></u><u></u></span></font></p>
</div><div class="im">
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (send dc set-scale 1 1)<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (send dc set-text-foreground "blue")<u></u><u></u></span></font></p>
</div>
</div><div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> (send dc draw-text "Use this window for
notes" 10 10))))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define c (new my-canvas% [parent f]))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define t (new text%))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(send f show #t)<u></u><u></u></span></font></p>
</div><div class="im">
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"> <u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define mb (new menu-bar% [parent f]))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define m-edit (new menu% [label "Edit"] [parent mb]))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(define m-font (new menu% [label "Font"] [parent mb]))<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(append-editor-operation-menu-items m-edit #f)<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt">(append-editor-font-menu-items m-font)<u></u><u></u></span></font></p>
</div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
</div></div>
<div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
<p class="MsoNormal"><font size="3" face="Times New Roman"><span style="font-size:12.0pt"><u></u> <u></u></span></font></p>
</div>
</div>
<br>____________________<br>
Racket Users list:<br>
<a href="http://lists.racket-lang.org/users" target="_blank">http://lists.racket-lang.org/users</a><br>
<br></blockquote></div><br></div>