windows in progress 10.2.b

[jmac12]

anyone got any docs or links for how open edge 10.2b creates windows. Ive got this issue when exiting a program a window is created which is just blank and i dont want it. I was wondering how i stop that/kill it off? any ideas would be ace cheers

 

[RealHeavyDude]

Do you mean that you see the procedure editor window when you exit from the last window?

RealHeavyDude.

 

[jmac12]

hi RHD,

I just relaised its the DEFAULT-WINDOW comming up. I enter a program and exit it then run another program that runs a .p and when i exit that .p i then get the DEFAULT-WINDOW sitting there being annoying I dont know why its there or how to get rid of it. It only seems to happen when i go into program before hand

 

[jmac12]

the program in front is the program i run the .p from but when i come back i get the default window as shown

 

[MaximMonin]

Progress displays default-window if you are trying to display/message something before any window was created by application. If application creates new window this window will be used instead default for display/message commands.

 

[jmac12]

well I have these 2 procedures to try and deal with the window

/*prepareWindowForChar  */               
assign  hanPrevWindow       =   current-window                   
        intPrevWindowWidth  =   current-window:virtual-width-pixels                   
        intPrevWindowHeight =   current-window:virtual-height-pixels.                   
                   
hide hanPrevWindow.                   
                   
create window hanTempWindow.                   
                   
assign  current-window                          =   hanTempWindow                   
        current-window:virtual-width-pixels     =   792                   
        current-window:virtual-height-pixels    =   518.                   
                   
return.                   
                   
END PROCEDURE. 
 
/*retrieveWindowFromChar*/
delete widget hanTempWindow.                   
                   
assign current-window                       =   hanPrevWindow                   
       current-window:virtual-width-pixels  =   intPrevWindowWidth                   
       current-window:virtual-height-pixels =   intPrevWindowHeight.                   
                   
view current-window.                   
                   
current-window:move-to-top().                   
                   
apply 'entry':u to current-window.                   
                   
return.                   
END PROCEDURE.

and they are run like this:

run prepareWindowForChar.
run gui_umenu/um002.p.
run retrieveWindowFromChar.



whats also annoying is that it only happens when i go into another program before hand

 

[MaximMonin]

Strange code.
I used to create window inside module (um002.p) and destroy it on close of this-procedure trigger.
Main window must be visible if possible. Else application's focus be lost and default window appears.

 

[jmac12]

ok I'll give that a try... Ps the code isnt mine just using what ive been given