Thanks!
And, unless you're trying to do something similar to what I am trying
to do, you might not have much use for text metrics.
Setting up test cases and running example code is an easy area to
neglect. (I know I have often neglected this realm.)
Anyways, I am going to use
glqtextmetrics=: {{
tm=. 7#2-2
chkgl2 cdrc=. ('"',libjqt,'" glqtextmetrics ',(IFWIN#'+'),' i *i') cd <tm
1{::cdrc
}}"1
until the gl2 package gets updated.
Thanks again,
--
Raul
On Fri, Nov 19, 2021 at 2:06 PM chris burke <[email protected]> wrote:
>
> Looking at the definition of glqtextmetrics, the cd call is
>
> ('"',libjqt,'" glqtextmetrics ',(IFWIN#'+'),' i *i') cd tm
>
> but the tm argument should be boxed.
>
> The code hasn't changed for years, so I don't understand why this never
> came up before.
>
> For example, try:
>
> require'gl2'
> coinsert'jgl2'
>
> a_b_paint=:{{
> tm=. 7#2-2
> chkgl2 cdrc=. ('"',libjqt,'" glqtextmetrics ',(IFWIN#'+'),' i *i') cd <tm
> echo 1{::cdrc
> EMPTY
> }}
>
> wd 'pc a closeok'
> wd 'minwh 450 350'
> wd 'cc b isigraph flush'
> wd 'pshow'
>
> On Fri, Nov 19, 2021 at 10:47 AM Raul Miller <[email protected]> wrote:
>
> > Yes... and I should probably be using an isidraw rather than an
> > isigraph for this kind of exploratory coding.
> >
> > My only concern about the isigraph is whether it would be possible to
> > avoid the crashes for example, by forcing some kind of error when the
> > context is isigraph but outside of a paint event handler.
> >
> > I'll start a new thread on that glqtextmetrics domain error.
> >
> > Thanks,
> >
> > --
> > Raul
> >
> > On Fri, Nov 19, 2021 at 1:40 PM Henry Rich <[email protected]> wrote:
> > >
> > > When I paste that into a new session I get a dialog box, indicating
> > > domain error in a call to cd, before the crash.
> > >
> > > Henry Rich
> > >
> > > On 11/19/2021 1:18 PM, Raul Miller wrote:
> > > > require'gl2'
> > > > coinsert'jgl2'
> > > > a_b_paint=:{{
> > > > glfont'arial 15'
> > > > glrgb 0 0 0
> > > > gltextcolor ''
> > > > glrgb 255 0 0
> > > > glbrush''
> > > > glrect 10 10 100 100
> > > > gltextxy 50 50
> > > > gltext 'hello'
> > > > M=:glqtextmetrics''
> > > > }}
> > > >
> > > > wd 'pc a closeok'
> > > > wd 'minwh 450 350'
> > > > wd 'cc b isigraph flush'
> > > > wd 'pshow'
> > >
> > >
> > > --
> > > This email has been checked for viruses by AVG.
> > > https://www.avg.com
> > >
> > > ----------------------------------------------------------------------
> > > For information about J forums see http://www.jsoftware.com/forums.htm
> > ----------------------------------------------------------------------
> > For information about J forums see http://www.jsoftware.com/forums.htm
> >
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
