I do something similar with a prg that sits on a utility menu:
ACTIVATE WINDOW debug
ACTIVATE WINDOW View
ACTIVATE WINDOW Properties
ACTIVATE WINDOW Document
DOCK WINDOW properties POSITION 4 WINDOW view
DOCK WINDOW document POSITION 4 WINDOW view
IF WEXIST('standard')
HIDE WINDOW standard
ENDIF
IF WEXIST('standard')
ACTIVATE WINDOW standard
ENDIF
>Here is a handy Macro that we set up and use. I thought that I would share. It only works in VFP9.
>
>{F2}{CTRL+END}{HOME}Activate{SPACEBAR}Window{SPACEBAR}'Properties'{SPACEBAR}{ENTER}
>{F2}Activate{SPACEBAR}Window{SPACEBAR}"View","Document{SPACEBAR}View"{ENTER}
>{F2}DOCK{SPACEBAR}WINDOW{SPACEBAR}"Document{SPACEBAR}View"{SPACEBAR}POSITION{SPACEBAR}4{SPACEBAR}WINDOW{SPACEBAR}"View"{SPACEBAR}{ENTER}
>{F2}DOCK{SPACEBAR}Window{SPACEBAR}"Properties"{SPACEBAR}Position{SPACEBAR}4{SPACEBAR}Window{SPACEBAR}"View"{ENTER}
>{F2}DOCK{SPACEBAR}WINDOW{SPACEBAR}"Document{SPACEBAR}View"{SPACEBAR}POSITION{SPACEBAR}2{ENTER}
>{F2}
.·*´¨)
.·`TCH
(..·*
010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"