I guess my previous J601 codes depended on a bug in J601 (MaxSRows). To
demonstrate, run the following code in J601 and J602 d-beta
(beware of wrapping in line show__grid )
NB. J601
tt_run ''
12
17
200
12
12
NB. J602
tt_run ''
36
17
200
12
12
NB. ========================================
load 'jsgrid'
TT=: 0 : 0
pc tt closeok;
xywh 0 0 255 100;cc g isigraph;
pas 6 6;pcenter;
rem form end;
)
tt_run=: 3 : 0
wd TT
NB. initialize form here
wd 'pshow;'
grid=: '' conew 'jsgrid'
show__grid ('CELLDATA' ; 'GRIDID' ; 'HDRCOL' ; 'COLWIDTH' ; 'CELLALIGN' ;
'COLAUTOFIT' ; 'COLSCALE' ; 'HDRCOLALIGN' ; 'GRIDSORT') ,. (40 1$<("0) i.100) ;
'g' ; (<'abc') ; 100 ; 0 ; 0 ; 0 ; 1 ; 0
1!:2&2 MaxSRows__grid
1!:2&2 >. RowMinHeight__grid
1!:2&2 >. Sh__grid
1!:2&2 >. Sh__grid % RowMinHeight__grid
)
tt_close=: 3 : 0
wd'pclose'
)
NB. ========================================
--
regards,
bill
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
