
I managed to integrate MS-Word in a Progress window. I've also been able to hide the MS-Word toolbars. But what I'm trying to achieve is that I want to remember the initial MS-Word configuration because I want to reset that configuration when I close my Progress session. I tried the following, but that doesn't work. The problem is remembering the initial configuration
/* Remember the MS-Word configuration */
l_Toolbar[1] = Document:CommandBars:ITEM(1):VISIBLE.
l_Toolbar[2] = Document:CommandBars:ITEM(2):VISIBLE.
etc....
/* Hide the toolbar */
DO i_#ToolBars = 1 TO 30:
IF l_ToolBar[i_#ToolBars] THEN DO:
i_#Item = i_#Item + 1.
HideToolBar(i_#Item).
END.
END.
FUNCTION HideToolbar RETURNS LOGICAL i AS INT) :
APPLICATION:commandbars:ITEM(i):VISIBLE = FALSE.
Document:commandbars:ITEM(i):VISIBLE = FALSE.
RETURN TRUE. /* Function return value. */
END FUNCTION.
To reset the configuration, I view the same toolbars again (obviously).
Does anyone have any suggestions?