#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"            && Command Window
DIMENSION aToolBars[12,2]
aToolBars[1,1] = TB_FORMDESIGNER_LOC
aToolBars[2,1] = TB_STANDARD_LOC  
aToolBars[3,1] = TB_LAYOUT_LOC
aToolBars[4,1] = TB_QUERY_LOC
aToolBars[5,1] = TB_VIEWDESIGNER_LOC
aToolBars[6,1] = TB_COLORPALETTE_LOC  
aToolBars[7,1] = TB_FORMCONTROLS_LOC
aToolBars[8,1] = TB_DATADESIGNER_LOC
aToolBars[9,1] = TB_REPODESIGNER_LOC
aToolBars[10,1] = TB_REPOCONTROLS_LOC
aToolBars[11,1] = TB_PRINTPREVIEW_LOC
aToolBars[12,1] = WIN_COMMAND_LOC
FOR i = 1 TO ALEN(aToolBars, 1)
  aToolBars[i,2] = WVISIBLE(aToolBars[i,1])
  IF aToolBars[i,2]
    HIDE WINDOW (aToolBars[i,1])
  ENDIF
ENDFOR