Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
PANTALLAS EN VISUAL FOX
Message
De
02/04/1999 18:12:37
 
 
À
02/04/1999 17:42:58
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00204830
Message ID:
00204836
Vues:
24
>ME HA SURGIDO OTRO PROBLEMA Y ES QUE MI MAESTRA ME DIJO QUE NO QUERIA PANTALLAS DE VISUAL FOX POR EJEMPLO CUANDO ALGUIEN PRESIONA EL BOTON DE ELIMINAR APARECE UN MENSAJE DICIENDO ¿DESEA ELIMINAR ESTE REGISTRO? Y EN LA PARTE SUPERIOR DICE VISUAL FOX PRO CON EL LOGOTIPO DEL LOBITO EN LA PARTE SUPERIOR IZQUIERDA. QUIERO SABER COMO HACERLE PARA QUE NO NOMAS CUANDO LE APRIETE ESE BOTON SINO TAMBIEN CUANDO EJECUTE EL FORMULARIO NO ME APAREZCA NINGUN TIPO DE PANTALLA QUE DIGA O ESTE EL LOGOTIPO DEL LOBITO.

Mira esos mensajes probablemente esten controlados por el FRAMEWORK, y si hiciste tu aplicacion usando el asistente tienes que encontrar en que metodo estan enterrado estos mensajes y si hay alguna manera de sobrepasarlos, lo que puedes hacer es revisar el codigo de los botones y ver si ahi se encuentran los mensajes, recuerda tienes que revisar el codigo de tu clase padre, no la que ya esta en tus formularios, de cualquier manera no te recomiendo que lo hagas por que puedes alterar todo el arbol de herencia ... ahora si quizieras escribir el codigo eso seria mucho mas complicado.

por otra parte no se por que tu maestra te pide esto no se me hace una practica muy apropiada...

Los botones ejecutan la accion presisamente por que contestas estos dialogos
por ejemplo el boton Borrar probablemente tiene un codigo como este :

IF MESSAGEBOX(C_DELETE_LOC,C_MSGBOX1) = MSGBOX_YES
DELETE
IF THIS.Parent.UpdateRows() &&success
* Success
IF !EOF()
SKIP 1
ENDIF
IF EOF() AND !BOF()
SKIP -1
ENDIF
ENDIF
THISFORM.LockScreen = .T.
THIS.Parent.ButtonRefresh()
THIS.Parent.NavRefresh()
THISFORM.LockScreen = .F.
ENDIF
aqui si la condicion IF no se cumple nada pasa, te das cuenta que seria muy arriesgado no tener este mensaje aqui ... en este caso para sobrepasar la
accion tendrias que eliminar la primera condicion IF-ENDIF pero no te lo recomiendo... talvez halla alguna forma mas sencilla de hacerlo pero no la se...
An Intelligent fool can make things bigger and more complex... It takes a touch of a genius -and a lot of courage- to move in the opposite direction".
-Albert Einstein
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform