romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Changeset: 210 fdbozzo - 16/03/2014 00:27:29:

Browse Source 
- Arreglo bug mnx: Cuando el prompt de una opción contiene comillas, se genera un mn2 inválido (Ryan Harris)
This commit is contained in:
fdbozzo
2014-03-16 10:14:27 +01:00
parent 2c9d4beb2c
commit 665891c632
7 changed files with 106 additions and 48 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
TESTS/DATOS_READONLY/menu2.mn2
View File

@@ -70,7 +70,12 @@ ON PAD _40Q0H1MMN OF _MSYSMENU ACTIVATE POPUP Opci
SKIP FOR valor de skip() ;
MESSAGE "un mensaje de texto" && Y este es<CR>el nuevo comando<CR>dentro de un PROC!
ON SELECTION BAR 3 OF Opci<63>nA_CS ON ERROR ****
ON SELECTION POPUP Opci<63>nA_CS *-- PROCEDURE Le cambi<62> el nombre!
DEFINE BAR 4 OF Opci<63>nA_CS PROMPT ""About " + oApp.AppName()"
ON BAR 4 OF Opci<63>nA_CS ACTIVATE POPUP NewItem
*----------------------------------
DEFINE POPUP NewItem MARGIN RELATIVE SHADOW COLOR SCHEME 4 ON SELECTION POPUP Opci<63>nA_CS *-- PROCEDURE Le cambi<62> el nombre!
DEFINE PAD opc_b OF _MSYSMENU PROMPT "Opci<63>n B con comando" COLOR SCHEME 3 ;
KEY CTRL+B, "Pulse CTRL+B" ;
@@ -78,7 +83,13 @@ DEFINE PAD opc_b OF _MSYSMENU PROMPT "Opci
MESSAGE "Mensaje para Opci<63>n B con Command" && Comentario de la Opci<63>n b
ON SELECTION PAD opc_b OF _MSYSMENU WAIT WINDOW "Opci<63>n B"
ON SELECTION POPUP ALL DO ALL_FB2P
DEFINE PAD _40T0B3WE4 OF _MSYSMENU PROMPT "\<About ] + alltrim(oApp.GetPProp([icAppTitle]))+"..." + [" COLOR SCHEME 3
ON PAD _40T0B3WE4 OF _MSYSMENU ACTIVATE POPUP _40t0aif1j
*----------------------------------
DEFINE POPUP _40t0aif1j MARGIN RELATIVE SHADOW COLOR SCHEME 4ON SELECTION POPUP ALL DO ALL_FB2P
ON SELECTION MENU _MSYSMENU DO SELECTION_MENU__MSYSMENU_FB2P
*</MenuCode>