diff --git a/TESTS/DATOS_READONLY/f_form_aa.sc2 b/TESTS/DATOS_READONLY/f_form_aa.sc2 index 5d67260..3111f33 100644 --- a/TESTS/DATOS_READONLY/f_form_aa.sc2 +++ b/TESTS/DATOS_READONLY/f_form_aa.sc2 @@ -148,7 +148,7 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" WhatsThisButton = .F. WhatsThisHelp = .F. WhatsThisHelpID = -1 - Width = (984) + Width = (998) WindowState = 0 WindowType = 0 ZoomBox = .F. diff --git a/TESTS/DATOS_READONLY/f_form_aa.sct b/TESTS/DATOS_READONLY/f_form_aa.sct index eb32e92..ecdaea5 100644 Binary files a/TESTS/DATOS_READONLY/f_form_aa.sct and b/TESTS/DATOS_READONLY/f_form_aa.sct differ diff --git a/TESTS/DATOS_READONLY/f_form_aa.scx b/TESTS/DATOS_READONLY/f_form_aa.scx index db919a8..53710c5 100644 Binary files a/TESTS/DATOS_READONLY/f_form_aa.scx and b/TESTS/DATOS_READONLY/f_form_aa.scx differ diff --git a/TESTS/DATOS_READONLY/f_form_aa2.sc2 b/TESTS/DATOS_READONLY/f_form_aa2.sc2 index c94a573..c0d8745 100644 --- a/TESTS/DATOS_READONLY/f_form_aa2.sc2 +++ b/TESTS/DATOS_READONLY/f_form_aa2.sc2 @@ -26,7 +26,6 @@ DEFINE CLASS f_form_aa1 AS f_form_aa OF "lib_controles.vcx" Left = (2) Name = "F_form_aa1" Top = (4) - Width = 984 Cl_grid1.AllowAddNew = .F. Cl_grid1.AllowAutoColumnFit = 0 Cl_grid1.AllowCellSelection = .T. diff --git a/TESTS/DATOS_READONLY/f_form_aa2.sct b/TESTS/DATOS_READONLY/f_form_aa2.sct index 26e053e..4a35324 100644 Binary files a/TESTS/DATOS_READONLY/f_form_aa2.sct and b/TESTS/DATOS_READONLY/f_form_aa2.sct differ diff --git a/TESTS/DATOS_READONLY/f_form_aa2.scx b/TESTS/DATOS_READONLY/f_form_aa2.scx index e101402..495ec8e 100644 Binary files a/TESTS/DATOS_READONLY/f_form_aa2.scx and b/TESTS/DATOS_READONLY/f_form_aa2.scx differ diff --git a/TESTS/DATOS_READONLY/lib_controles.vc2 b/TESTS/DATOS_READONLY/lib_controles.vc2 index 0f99822..d4f4f4b 100644 --- a/TESTS/DATOS_READONLY/lib_controles.vc2 +++ b/TESTS/DATOS_READONLY/lib_controles.vc2 @@ -4954,7 +4954,6 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" DefLeft = DefOleLCID = 0 DefTop = - DefWidth = Desktop = .F. Dockable = 0 DoCreate = .T. @@ -5024,7 +5023,7 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" WhatsThisButton = .F. WhatsThisHelp = .F. WhatsThisHelpID = -1 - Width = (984) + Width = 998 WindowState = 0 WindowType = 0 ZoomBox = .F. diff --git a/TESTS/DATOS_READONLY/lib_controles.vct b/TESTS/DATOS_READONLY/lib_controles.vct index e23f3a2..ba25d8f 100644 Binary files a/TESTS/DATOS_READONLY/lib_controles.vct and b/TESTS/DATOS_READONLY/lib_controles.vct differ diff --git a/TESTS/DATOS_READONLY/lib_controles.vcx b/TESTS/DATOS_READONLY/lib_controles.vcx index cadb2f4..1200696 100644 Binary files a/TESTS/DATOS_READONLY/lib_controles.vcx and b/TESTS/DATOS_READONLY/lib_controles.vcx differ diff --git a/TESTS/DATOS_READONLY/menu1.mn2 b/TESTS/DATOS_READONLY/menu1.mn2 index a2a52f7..14c9144 100644 --- a/TESTS/DATOS_READONLY/menu1.mn2 +++ b/TESTS/DATOS_READONLY/menu1.mn2 @@ -14,13 +14,13 @@ * DEFINE MENU _MSYSMENU BAR -DEFINE PAD _42I10MLX9 OF _MSYSMENU PROMPT "Opción A con submenú" COLOR SCHEME 3 ; +DEFINE PAD _43302YWGE OF _MSYSMENU PROMPT "Opción A con submenú" COLOR SCHEME 3 ; NEGOTIATE NONE, LEFT ; KEY DEL, "Pulsar " ; SKIP FOR SKIP_FOR() ; MESSAGE "Mensaje para Opción A con submenú" && Comentario -ON PAD _42I10MLX9 OF _MSYSMENU ACTIVATE POPUP OpciónA_CS +ON PAD _43302YWGE OF _MSYSMENU ACTIVATE POPUP OpciónA_CS *---------------------------------- DEFINE POPUP OpciónA_CS MARGIN RELATIVE SHADOW COLOR SCHEME 4 diff --git a/TESTS/DATOS_READONLY/menu2.mn2 b/TESTS/DATOS_READONLY/menu2.mn2 index ae238e6..566c4db 100644 --- a/TESTS/DATOS_READONLY/menu2.mn2 +++ b/TESTS/DATOS_READONLY/menu2.mn2 @@ -84,9 +84,9 @@ DEFINE PAD opc_b OF _MSYSMENU PROMPT "Opci ON SELECTION PAD opc_b OF _MSYSMENU WAIT WINDOW "Opción B" -DEFINE PAD _42I10FCOZ OF _MSYSMENU PROMPT "\ DEFINE MENU _MSYSMENU BAR -DEFINE PAD _42I10MLZH OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3 +DEFINE PAD _43302YWIM OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3 -ON SELECTION PAD _42I10MLZH OF _MSYSMENU do test +ON SELECTION PAD _43302YWIM OF _MSYSMENU do test -DEFINE PAD _42I10MLZI OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3 +DEFINE PAD _43302YWIN OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3 -ON SELECTION PAD _42I10MLZI OF _MSYSMENU DO TEST +ON SELECTION PAD _43302YWIN OF _MSYSMENU DO TEST * diff --git a/TESTS/DATOS_READONLY/test_report.fr2 b/TESTS/DATOS_READONLY/test_report.fr2 index 4cb613f..9df0f6e 100644 --- a/TESTS/DATOS_READONLY/test_report.fr2 +++ b/TESTS/DATOS_READONLY/test_report.fr2 @@ -74,8 +74,7 @@ COLOR=2