I think pmove is simple, you only need to add a delta of the original and calculated wh of isidraw.
On 14 Dec, 2014, at 5:28 AM, Henry Rich <[email protected]> wrote: > pmove does set a new size, which is a workaround for me. But could this be > put onto the big list for the next release? Having pas working would save me > the task of calculating the minimum enclosing window size myself. > > Henry Rich > > On 12/13/2014 11:06 AM, bill lam wrote: >> I think it needs updateGeometry to trigger a reculculation for >> form layout. typically when pas is set, the form is not yet >> shown on screen and therefore pas itself will not force a >> reszie. >> >> you may try pmove (untested) >> >> Сб, 13 дек 2014, Henry Rich написал(а): >>> On the 803 release (Windows 7 32-bit), I have a form (the only important >>> part is the last 4 lines): >>> >>> FORM =: 0 : 0 >>> pc dissect; >>> bin vh; >>> minwh 54 60;cc fmfontsize combolist; >>> minwh 24 12;cc lbl00 static;cn "Min Font"; >>> bin s; >>> minwh 42 60;cc fmmaxnounsizex combolist; >>> minwh 80 12;cc fmmaxnounsizexlbl static;cn "Max Noun Width (% of scrn)"; >>> bin s; >>> minwh 42 60;cc fmmaxnounsizey combolist; >>> minwh 80 12;cc fmmaxnounsizeylbl static;cn "Max Noun Height (% of scrn)"; >>> bin s; >>> minwh 49 12;cc fmshowstealth button;cn "Show ]["; >>> minwh 65 12;cc fmshowerror button;cn "Show Error"; >>> bin z; >>> minwh 20 20;cc dissectisi isidraw flush; >>> bin z; >>> pas 0 0; >>> rem form end; >>> ) >>> >>> I then figure out how big the isidraw control needs to be. I issue >>> >>> wd 'set dissectisi wh <the new size>;' >>> wd 'pas 1 1;' >>> >>> At this point the parent should be resized to make everything visible, >>> right? It isn't. It stays at the original small size. >>> >>> I then draw graphics into the isidraw. When I manually resize the window, >>> the graphics are all visible. >>> >>> In short, it seems that the pas has no effect. I tried following it with >>> pshow, but that made no difference. >>> >>> >>> Henry Rich >>> ---------------------------------------------------------------------- >>> 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
