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

Changeset: 137 v1.19.3 Change on TXT timestamps to preserve empty values / Optimization on TXT generation of ZOrders

Browse Source
This commit is contained in:
fernando
2014-01-18 17:00:58 +01:00
parent 9662864301
commit a57790bb56
19 changed files with 2725 additions and 483 deletions
Download Patch File Download Diff File Expand all files Collapse all files

98
TESTS/DATOS_READONLY/menu_shortcut2.mn2 Normal file
View File

@@ -0,0 +1,98 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\menu_shortcut2.mnx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*<MenuType>4</MenuType>
*<MenuLocation>REPLACE</MenuLocation>
*<SetupCode>
*-- Setup code
*</SetupCode>
*<MenuCode>
DEFINE POPUP MiShortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF MiShortcut PROMPT "Opci<63>n A con submen<65>" ;
KEY DEL, "Pulsar <DEL>" ;
SKIP FOR SKIP_FOR() ;
MESSAGE "Mensaje para Opci<63>n A con submen<65>" && Comentario
ON BAR 1 OF MiShortcut ACTIVATE POPUP Opci<63>nA_CS
*----------------------------------
DEFINE POPUP Opci<63>nA_CS SHORTCUT RELATIVE
DEFINE BAR 1 OF Opci<63>nA_CS PROMPT "Opci<63>n A-1" ;
PICTURE "..\..\foxunit\fxuacknowledgements.bmp"
ON BAR 1 OF Opci<63>nA_CS ACTIVATE POPUP Opci<63>nA1
*----------------------------------
DEFINE POPUP Opci<63>nA1 SHORTCUT RELATIVE
DEFINE BAR 1 OF Opci<63>nA1 PROMPT "Opci<63>nA-1-Sub" ;
PICTURE "..\..\foxunit\fxuacknowledgements.bmp"
ON SELECTION BAR 1 OF Opci<63>nA1 wait window "Ejecuta Comando o funci<63>n para Opci<63>n A-1"
DEFINE BAR 2 OF Opci<63>nA_CS PROMPT "Opci<63>n A-2"
ON BAR 2 OF Opci<63>nA_CS ACTIVATE POPUP Opci<63>nA2SU
*----------------------------------
DEFINE POPUP Opci<63>nA2SU SHORTCUT RELATIVE
DEFINE BAR 1 OF Opci<63>nA2SU PROMPT "Opci<63>n A-2-Sub.1" ;
MESSAGE "Message para Opci<63>n A-2-Sub.1 (Tipo Procedure)"
ON SELECTION BAR 1 OF Opci<63>nA2SU DO BAR_1_OF_Opci<63>nA2SU_FB2P
DEFINE BAR 2 OF Opci<63>nA2SU PROMPT "O\<pci<63>n A-2-Sub.2" ;
KEY CTRL+E, "Pulsar CTRL+E" ;
SKIP FOR NOT glEnabled_Opc_A_2_Sub_2 ;
MESSAGE "Mensaje para _Opc_A_2_Sub_2 (Tipo Command y con Bar # 2)" && Comentario para Opci<63>n A-2-Sub.2 (Tipo Command y con Bar # 2)
ON SELECTION BAR 2 OF Opci<63>nA2SU wait window "Ejecuta Comando o funci<63>n para Opci<63>n A-2-Sub.2"
DEFINE BAR 3 OF Opci<63>nA2SU PROMPT "Opci<63>n A-2-Sub.4" ;
MESSAGE "Message para Opci<63>n A-2-Sub.4 (Tipo Submenu)"
ON BAR 3 OF Opci<63>nA2SU ACTIVATE POPUP _3ym134xpb
*----------------------------------
DEFINE POPUP _3ym134xpb SHORTCUT RELATIVE
DEFINE BAR 1 OF _3ym134xpb PROMPT "FIN!" ;
MESSAGE "Message para FIN! (Tipo Command)"
ON SELECTION BAR 1 OF _3ym134xpb QUIT
DEFINE BAR _MFI_SYSPRINT OF Opci<63>nA2SU PROMPT "Opci<63>n A-2-Sub.3" ;
KEY CTRL+R, "CTRL+R" ;
SKIP FOR NOT glEnabled_Opc_A_2_Sub_3 ;
PICTRES _mfi_sysprint ;
MESSAGE "Message para Opci<63>n A-2-Sub.3 (Tipo Bar#)" && Comentarios para Opci<63>n A-2-Sub.3
DEFINE BAR 2 OF MiShortcut PROMPT "Opci<63>n B con comando" ;
KEY CTRL+B, "Pulse CTRL+B" ;
SKIP FOR NOT glEnabled_Opc_B ;
MESSAGE "Mensaje para Opci<63>n B con Command" && Comentario de la Opci<63>n b
ON BAR 2 OF MiShortcut ACTIVATE POPUP opc_b
*----------------------------------
DEFINE POPUP opc_b SHORTCUT RELATIVE
DEFINE BAR 1 OF opc_b PROMPT "Opci<63>n B con comando" ;
KEY CTRL+B, "Pulse CTRL+B" ;
SKIP FOR NOT glEnabled_Opc_B ;
MESSAGE "Mensaje para Opci<63>n B con Command" && Comentario de la Opci<63>n b
ON SELECTION BAR 1 OF opc_b WAIT WINDOW "Opci<63>n B"
ON SELECTION POPUP MiShortcut *- Menu procedure
ON SELECTION POPUP ALL *-- Menu Procedure Principal
ACTIVATE POPUP MiShortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Opci<63>nA2SU_FB2P
*PROCEDURE Menu1_Opci<63>n_A_2_Sub
*-- Mi procedure!
*ENDPROC
ENDPROC && BAR_1_OF_Opci<63>nA2SU_FB2P
*</Procedures>
*<CleanupCode>
*-- Cleanup code
*</CleanupCode>