La Web del Programador: Comunidad de Programadores
 
https://www.lawebdelprogramador.com/preguntas/

    Pregunta:  779 - TOOLBARS EN VFP
Autor:  Ezequiel Cetina Mc
Agradezco de antemanoo a la persona que pueda responder mi pregunta, ojala y la puedan responder ya que me es muy urgente...mi pregunta es:

¿Como puedo desactivar la barra de herramientas standar en Visual Fox Pro durante la ejecución de un programa que se desarrolla en esta misma aplicación?...

De antemano muchas gracias...

  Respuesta:  Jose Jaimes
Es Sencillo prueba con esta instruccion
Oculta la Barra de Menu de FOX

set sysmenu to

Reactiva la Barra de Menu de Fox

set sysmenu to defa
  Respuesta:  Jorge Alejandro Espinosa
Deberias poner en el main de tu aplicacion la siguiente linea :
DEACTIVATE WINDOW "STANDARD"
y utilizarla del mismo modo para activar o desactivar cualquier otra barra.

Suerte.

  Respuesta:  Manuel
Hola amigo en mi caso, la forma que utilize fue desactivando todas las barras de Visual para que no me aparescan en el programa exe.

escribeme para saber como te fue.. un Amigo de Costa Rica

  Respuesta:  Silvio Watson
Esto ya lo hice hace poco. Funciona y te ayudará.
El Código es el siguiente:
public array b(11,3)
b(1,1)=´Estándar´
b(2,1)=´Diseñador de Formularios´
b(3,1)=´Diseñador de Informes´
b(4,1)=´Controles de Formularios´
b(5,1)=´Diseñador de Bases de Datos´
b(6,1)=´Controles de Informes´
b(7,1)=´Diseñador de Consultas´
b(8,1)=´Diseño´
b(9,1)=´Vista Preliminar´
b(10,1)=´Paleta de colores´
b(11,1)=´Diseñador de Vistas´
for i = 1 to alen(b,1)
b(i,2)=wvisible(b(i,1))
if b(i,2)
b(i,3)=´s´
hide window (b(i,1))
endif
endfor
Este Código cambia para versiones en otros idiomas, es decir, el nombre de las barras es el que cambia.
Suerte... Silvio
  Respuesta:  José Manuel Franco Juarez
Yo tenia ese mismo problema lo que hice fue lo siguiente,
PUBLIC BARRAS[11]
BARRAS[01] = [´COLOR PALETTE´]
BARRAS[02] = [´DATABASE DESIGNER´]
BARRAS[03] = [´FORM CONTROLS´]
BARRAS[04] = [´FORM DESIGNER´]
BARRAS[05] = [´LAYOUT´]
BARRAS[06] = [´PRINT PREVIEW´]
BARRAS[07] = [´QUERY DESIGNER´]
BARRAS[08] = [´REPORT CONTROLS´]
BARRAS[09] = [´REPORT DESIGNER´]
BARRAS[10] = [´STANDARD´]
BARRAS[11] = [´VIEW DESIGNER´]
FOR FILA = 1 TO 11
TOOLS = BARRAS[FILA]
RELEASE WINDOW &TOOLS
ENDFOR
también te funciona tecleando
RELEASE WINDOW
Si te funciona me lo haces saber