Is there a mode or way to minimize the main ProComm window and still keep a dialogbox visible ? I am using a dialogbox as a monitor GUI that is continually being updated and would like to minimize the main window.
I found a way to hide the main window and leave the dialogbox visible using "winhide $PWMAINWIN" and a "when" statement that does a "winshow $PWMAINWIN" when the dialogbox is closed. Thought you might be interested.
Thanks for all the great post, You have provide me with a ton of info.
I have posted the full "RNC MONITOR" script in another thread. Below is what I did, luckly the dlgupdate doesn't trigger the when statement. If you could look at the whole script and give me some pointers on what to do better or different. The script runs great but I know it could be better.
Thanks.
proc main
rncts[1] = " Retrieving Data"
rncts[2] = " !!! Please Wait !!!"
set terminal scroll on
set terminal sbpages 1300
set capture recordmode raw
set capture query on
MONsetup()
GUIbd()
when dialog 10 call winback ; Watch for manual close of GUI
while 1
SCcard()
CPUutil()
DOMck()
DOMtype()
NODEck()
ATinfo()
GENinfo()
MEMck()
RNSMinfo()
GUIupdt()
endwhile
endproc
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
;% Get RNC Monitor Setup from user:
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
proc MONsetup
dialogbox 0 216 121 196 158 6 "RNC Monitor Setup Written By: Chase Vale"
groupbox 1 11 0 174 59
text 3 22 13 110 11 "Display RNSM and CPU Util Info:" left
checkbox 4 157 13 12 11 "" rncon
text 5 22 28 110 11 "Hide ProComm Window:" left
checkbox 6 142 26 12 11 "" pchid
text 7 22 42 110 11 "Open Capture File:" left
checkbox 8 124 40 12 11 "" capon
text 9 12 67 170 11 "Enter the number of expected DOMS (Default is 1)" left
text 10 22 75 150 11 "in enable mode, 'show 1xevdo counters air'" left
editbox 11 68 89 50 11 DOMS
text 12 12 103 170 11 "Enter the number of seconds to pause (Default is 60)" left
editbox 13 68 116 50 11 PAUSEC
pushbutton 14 52 135 40 13 "GO!!!!" OK DEFAULT
pushbutton 15 106 135 40 13 "&Quit"
enddialog
while 1
dlgevent 0 Event ; Get dialog event.
switch Event ; Evaluate dialog event.
case 0 ; No event occurred.
endcase
case 14 ; Button was pressed.
if capon
capture on
endif
if pchid
winhide $PWMAINWIN
endif
exitwhile ; Exit the while loop.
case 15 ; Cancel button
exit
endcase
endswitch
endwhile
dlgdestroy 0 CANCEL ; Get rid of dialog box.
strtonum PAUSEC pasec
endproc
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.