Page 1 of 1
MODAL WINDOW
Posted:
Fri Dec 02, 2011 1:32 pm
by ukservice
Hello,
How is possible to define a Window Modal like a Dialog?.
Thanks.
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 3:51 pm
by StefanHaupt
Activate Diaog NOWAIT
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 3:59 pm
by ukservice
Hello,
This for non modal dialog.
I want a Window acting Modal as a Dialog.
Thanks.
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 4:18 pm
by Enrico Maria Giordano
Please have a look at how rpreview.prg makes a modal window.
EMG
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 4:25 pm
by ukservice
Hello,
Enrico, I am afraid I don´t see how it works.
Any clue please?.
Thanks.
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 4:29 pm
by Enrico Maria Giordano
- Code: Select all Expand view
if ::oDevice:lPrvModal
if ::oWndMain == nil
StopUntil( { || ::lExit } )
else
StopUntil( { || ::lExit .or. !IsWindow( WndMain():hWnd ) } )
endif
endif
EMG
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 4:34 pm
by ukservice
Thanks.
I didn´t know about StopUntil()
Re: MODAL WINDOW
Posted:
Fri Dec 02, 2011 9:33 pm
by Antonio Linares
John,
The risk of calling SysRefresh() (StopUntil() uses it) is that it could process an unwanted event.
So an alternative solution to simulate a modal window is to disable the other windows where we don't want the focus to go to:
oWndOther:Disable()
...
oWndOther:Enable()