FoxPro/Visual FoxPro - barra de fox

   
Vista:

barra de fox

Publicado por marcelo (14 intervenciones) el 31/03/2011 01:08:53
tengo este codigo en el prog pppal de un proyecto

CLOSE DATA ALL
SET TALK OFF
SET SAFETY OFF
SET CENTURY ON
SET deleted ON &&no considera los registros borrados
SET DATE brit
Set Sysmenu Off
PUBLIC colle,entra,meshoy
ON SHUTDOWN do salir
SET MULTILOCKS ON &&para trabajar con buffering
ON ERROR do form fr_errores with ERROR(),MESSAGE(),PROGRAM(),LINENO()
SET PROCEDURE to funciones ADDITIVE
SET CLASSLIB TO progress_bar ADDITIVE
SET CLASSLIB TO reloj_digital additive

colle=SYS(5)+CURDIR()
tablas=colle+'tables\'
SET PATH TO &colle,&tablas
OPEN DATABASE (tablas)+'admtaxis'
meshoy=""
PUBLIC ARRAY diasem[7,1]
diasem[1,1]="Domingo"
diasem[2,1]="Lunes"
diasem[3,1]="Martes"
diasem[4,1]="Miercoles"
diasem[5,1]="Jueves"
diasem[6,1]="Viernes"
diasem[7,1]="Sábado"
USE admtaxis!mes
LOCATE FOR nromes=PADL(ALLTRIM(STR(month(DATE()))),2,"0")
IF FOUND()
meshoy=mes.nombre
endif
USE &&cierro tabla mes
entra=.f.

USE admtaxis!parametros
SELECT parametros
_screen.Icon="note03.ico"
_screen.Caption="ADMINISTRACION DE TAXIS"
_screen.AutoCenter=.T.
_screen.visible=.T.
_screen.Height=600
_screen.Width=800
_screen.backcolor=parametros.backcolor
_screen.Closable=.F.
_screen.BorderStyle= 0
DO FORM fpassword WITH entra

IF (entra)
DO form fr_fondo
do MENUTAXI.MPR
READ EVENTS
endif

no puedo lograr que se oculte la barra de herramientas de fox .probe algunas cosas que me sugirieron en un mensaje anterior ,pero no me dieron resultado .ahora envio el codigo completo a ver si por favor me pueden ayudar .

gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

barra de fox

Publicado por CESAR (63 intervenciones) el 01/04/2011 19:05:50
Proba escribiendo el SET sysmenu off all final de tus sets. Yo lo tengo asi.

Cesar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

barra de fox

Publicado por marcelo (14 intervenciones) el 01/04/2011 21:29:53
gracias por responder .pero creo haber encontrado una solucion y lo que me paso :
yo compile el proyecto con las barras activadas .buscando en posts anteriores vi que una persona lo soluciono compilando con las barras desactivadas y no le salieron al ejecutar el exe .de todas maneras ,otras soluciones que vi son .poner en el principal :

cToolbar='standard'
if wexist(cToolbar) and wvisible(cToolbar)
deactivate window(cToolbar)
endif ,

(valido para cualquier barra que se quiera ocultar (esto ultimo lo probe y anda )
aporto la solucion por si a alguien mas le pasa .

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar