Hello all,

 

When I run the following script, everything works great in J801.

In J802, the graphics (isigraphs) are empty.

 

Is there any documentation for J802 to plot to isigraph client controls in a
form?

 

Many thanks in advance.

 

Martin

 

 

 

NB. isitest1.ijs

 

require 'plot trig numeric' NB. gl2'

 

NB. coinsert 'jgl2'

 

isitest1_win =: 0 : 0

   pc isitest1 nosize;

   pn isigraph test;

   bin h g;

   minwh 320 240;

   cc isi1 isigraph;

   minwh 320 240;

   cc isi2 isigraph;

   pcenter;

   pshow;

)

 

isitest1_run =: 3 : 0

   wd 'reset'

   wd isitest1_win

 

   isi1            =: conew 'jzplot'

   PForm__isi1     =: 'isitest1'

   PFormhwnd__isi1 =: wd 'qhwndp'

   PId__isi1       =: 'isi1'

   PIdhwnd__isi1   =: wd 'qhwndc isi1'

 

   isi2            =: conew 'jzplot'

   PForm__isi2     =: 'isitest1'

   PFormhwnd__isi2 =: wd 'qhwndp'

   PId__isi2       =: 'isi2'

   PIdhwnd__isi2   =: wd 'qhwndc isi2'

)

 

isitest1_close =: 3 : 0

   wd 'pclose'

)

 

isitest1_isi1_paint =: 3 : 0

NB.   glclear__isi1''

   pd__isi1 'reset'

   pd__isi1 sin steps 0 3 100

   pd__isi1 'show'

NB.   glpaint__isi1''

)

 

isitest1_isi2_paint =: 3 : 0

NB.   glclear__isi2''

   pd__isi2 'reset'

   pd__isi2 cos steps 0 3 100

   pd__isi2 'show'

NB.   glpaint__isi2''

)

 

isitest1_run''

 

 

 

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to