In addition for Norman's advice, it should be noted that minwh is usually not required in most cases because Qt's automatical layout should be fine. Alternatively, you may use pmove to give the form an initial size.
Пт, 30 авг 2013, Norman Drinkwater писал(а): > Change the wh to minwh. They used to be synonyms, but now only minwh works. > > On Aug 30, 2013, at 2:55 PM, "Tom Arneson" <[email protected]> wrote: > > > After installing the new binaries: > > > > JVERSION > > Engine: j701/2011-01-10/11:25 > > Library: 8.01.012 > > Qt IDE: 1.0.18/4.8.5 > > Platform: Win 64 > > Installer: j801 beta install > > InstallPath: c:/users/tom arneson/j801a_win64/j64-801 > > > > > > One of my applications won't run. The script follows: > > > > NB. ========================================================= > > Note 0 > > module: pedometer.ijs > > purpose: to send daily pedometer readings to a data file > > later additions will do anyalisis of theis data > > > > 2013-03-15 convert to J801 & Qt > > ) > > NB. ========================================================= > > > > require 'droidwd wdclass' > > require^:(-.IFJ6) ::0: 'gtkwd' > > coinsert 'wdbase' > > > > NB. ========================================================= > > > > FILENAME=: '~Projects/data/pedometer/pedometer.txt' > > > > NB. --------------------------------------------------------- > > readfile=: 3 : 0 > > 0".[;._2 (fread FILENAME)-.CR > > ) > > > > NB. --------------------------------------------------------- > > nextdate=: 3 : 0 > > todate >:todayno 3{._1{ readfile '' > > ) > > > > NB. nosize seems to work, but nomin does not > > > > NB. --------------------------------------------------------- > > PEDFORM=: 0 : 0 > > pc pedform escclose closebutton nosize;pn "Pedometer Data Entry"; wh 200 20; > > menupop "File"; > > menu view "&View" "" "" ""; > > menusep; > > menu exit "&Exit" "" "" ""; > > menupopz; > > rem Note setup for J801; > > bin vh; > > cc s0 static;cn "Date:"; > > cc s1 static;cn "2013 03 16"; > > bin zh; > > cc s3 static;cn "Steps:"; > > cc edit1 edit right; > > bin zh; > > cc sbar statusbar 255 0 0; > > set sbar addlabel sb0; > > pas 6 6;pcenter; > > rem form end; > > ) > > > > > > NB. --------------------------------------------------------- > > pedform_run=: 3 : 0 > > wd PEDFORM > > NB. initialize form here > > DATE=: nextdate'' > > wd 'setcaption s1 *',":DATE > > set edit1 focus; > > wd 'set sbar setlabel sb0 "Enter steps, then press enter key"' > > wd 'pshow;' > > ) > > > > NB. --------------------------------------------------------- > > NB. write the date and steps to the data file > > pedform_saveBut_button=: 3 : 0 > > if. (0<#edit1)*.0~:0{DATE do. > > z=. (d=. (;'q< >5.0,q< >r<0>3.0,q< >r<0>3.0' 8!:0 DATE),edit1) fappends > > FILENAME > > if. z~:_1 do. > > NB. wd 'sbarset status0 -1 "',d,' saved to file"' > > wd 'set edit1 text *' > > DATE=: todate >:todayno DATE NB. increment date > > wd 'setcaption s1 *',":DATE > > wd 'setfocus edit1' > > else. > > wdinfo 'Error';'Data not saved' > > end. > > else. > > if. 0~:0{DATE do. > > wd 'sbarset status0 -1 "No steps to Save!"' > > wd 'setfocus stepsEdit' > > else. > > NB. wd 'sbarset status0 -1 "Invalid date!"' > > pedform_dateButton_button'' > > end. > > end. > > ) > > > > NB. --------------------------------------------------------- > > pedform_close=: 3 : 'wd''pclose''' > > pedform_cancel_button=: 3 : 'pedform_close''''' > > > > NB. --------------------------------------------------------- > > pedform_edit1_button=: 3 : 'pedform_saveBut_button''''' > > pedform_exit_button=: 3 : 'pedform_close''''' > > pedform_view_button=: 3 : 'fview jpath FILENAME' > > > > pedform_run'' > > NB. ========================================================= > > > > NB. ERROR ******************************************** > > |wh : command not found: wd > > | (wd ::(''"_)'qer') (13!:8)3 > > NB. ERROR ******************************************** > > > > NB. ERROR occurs at: wd PEDFORM in verb pedform_run > > > > The script worked fine before today's update. My other application works OK. > > > > Thanks, Tom > > > > -----Original Message----- > > From: [email protected] > > [mailto:[email protected]] On Behalf Of bill lam > > Sent: Monday, July 22, 2013 19:03 > > To: JBeta > > Subject: [Jbeta] Updated binaries > > > > Binaries for mac and win have been updated to 1.0.14 on jsoftware. > > > > set select for edit, multiple select for listbox, to 1.0.14 fix recent > > projects log bugfix inputlog save project config when tab changed minor > > cleanups astyle indent > > > > -- > > regards, > > ==================================================== > > GPG key 1024D/4434BAB3 2008-08-24 > > gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 > > ---------------------------------------------------------------------- > > 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 -- regards, ==================================================== GPG key 1024D/4434BAB3 2008-08-24 gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
