>* Release all Visual FoxPro toolbars > >#DEFINE TB_FORMDESIGNER_LOC "Form Designer" >#DEFINE TB_STANDARD_LOC "Standard" >#DEFINE TB_LAYOUT_LOC "Layout" >#DEFINE TB_QUERY_LOC "Query Designer" >#DEFINE TB_VIEWDESIGNER_LOC "View Designer" >#DEFINE TB_COLORPALETTE_LOC "Color Palette" >#DEFINE TB_FORMCONTROLS_LOC "Form Controls" >#DEFINE TB_DATADESIGNER_LOC "Database Designer" >#DEFINE TB_REPODESIGNER_LOC "Report Designer" >#DEFINE TB_REPOCONTROLS_LOC "Report Controls" >#DEFINE TB_PRINTPREVIEW_LOC "Print Preview" >#DEFINE WIN_COMMAND_LOC "Command" > > LOCAL i > DIMENSION this.aToolBars[11,2] > this.aToolBars[1,1] = TB_FORMDESIGNER_LOC > this.aToolBars[2,1] = TB_STANDARD_LOC > this.aToolBars[3,1] = TB_LAYOUT_LOC > this.aToolBars[4,1] = TB_QUERY_LOC > this.aToolBars[5,1] = TB_VIEWDESIGNER_LOC > this.aToolBars[6,1] = TB_COLORPALETTE_LOC > this.aToolBars[7,1] = TB_FORMCONTROLS_LOC > this.aToolBars[8,1] = TB_DATADESIGNER_LOC > this.aToolBars[9,1] = TB_REPODESIGNER_LOC > this.aToolBars[10,1] = TB_REPOCONTROLS_LOC > this.aToolBars[11,1] = TB_PRINTPREVIEW_LOC > > FOR i = 1 TO ALEN(this.aToolBars,1) > IF WVISIBLE(this.aToolBars[i,1]) > Hide Window (this.aToolBars[i,1]) > ENDIF > ENDFOR >>and to restore toolbars
> LOCAL i > > * Show all VFP toolbars that were previously hidden > FOR i = 1 TO ALEN(this.aToolBars,1) > IF this.aToolBars[i,2] > Show Window (this.aToolBars[i,1]) > ENDIF > ENDFOR >>This code is what we use in an application that was written in VFP6 so I don't know if there are any additional toolbars in newer versions.