problema con checkbox en folderex
Posted: Thu Apr 28, 2022 5:53 pmEstimados, necesito de su ayuda, tengo un problema el cual he aislado en el ejemplo adjunto,
el caso es que el label del get numero 4, el cual dice "Edad", cuando se ingresa un dato en el primer get, el checkbox ("Prueba de checkbox") al refrescar su valor (el when que se ejecuta)
cambia su tamaño, y borra el texto inicialmente dicho (Edad). esto solo sucede cuando esta activado los theme, si se comenta en el rc la ultima linea, se muestra bien.
carlos.prg
el caso es que el label del get numero 4, el cual dice "Edad", cuando se ingresa un dato en el primer get, el checkbox ("Prueba de checkbox") al refrescar su valor (el when que se ejecuta)
cambia su tamaño, y borra el texto inicialmente dicho (Edad). esto solo sucede cuando esta activado los theme, si se comenta en el rc la ultima linea, se muestra bien.
carlos.prg
- Code: Select all Expand view
#include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oDlg, oFld
LOCAL nV1, cV2, lV3, nV4
nV1 := 0
cV2 := space(50)
lV3 := .t.
nV4 := 0
DEFINE DIALOG oDlg;
RESOURCE "FOLDER"
REDEFINE FOLDEREX oFld;
ID 101 OF oDlg;
PROMPTS "Test";
DIALOGS "TEST"
REDEFINE GET nV1;
ID 101 OF oFld:aDialogs[ 1 ];
PICTURE "9999"
REDEFINE GET cV2;
ID 102 OF oFld:aDialogs[ 1 ];
WHEN nV1 > 0;
PICTURE "@!"
REDEFINE CHECKBOX lV3;
ID 103 OF oFld:aDialogs[ 1 ];
WHEN nV1 > 0
REDEFINE GET nV4;
ID 104 OF oFld:aDialogs[ 1 ];
WHEN nV1 > 0;
PICTURE "99"
REDEFINE BTNBMP;
ID 102 OF oDlg;
FILE "\fwh\bitmaps\open.bmp";
NOBORDER
REDEFINE BUTTON;
ID 201 OF oDlg;
ACTION oDlg:End()
ACTIVATE DIALOG oDlg;
CENTER
RETURN NIL
- Code: Select all Expand view
// Generated by ResEdit 1.6.6
// Copyright (C) 2006-2015
// http://www.resedit.net
#include <windows.h>
#ifndef WC_TABCONTROL
#define WC_TABCONTROL "SysTabControl32"
#endif
#ifndef MONTHCAL_CLASS
#define MONTHCAL_CLASS "SysMonthCal32"
#endif
#ifndef DATETIMEPICK_CLASS
#define DATETIMEPICK_CLASS "SysDateTimePick32"
#endif
#ifndef VOS__WINDOWS32
#define VOS__WINDOWS32 0x00000004L
#endif
#ifndef VFT_APP
#define VFT_APP 0x00000001L
#endif
#ifndef VFT2_UNKNOWN
#define VFT2_UNKNOWN 0x00000000L
#endif
#ifndef WC_STATIC
#define WC_STATIC "Static"
#endif
#include "resource.h"
//
// Dialog resources
//
FOLDER DIALOG 49, 52, 365, 295
STYLE DS_MODALFRAME | DS_SETFONT | WS_CAPTION | WS_POPUP | WS_SYSMENU
CAPTION "Folder test"
FONT 8, "MS Sans Serif"
{
CONTROL "", 101, "TFolderex", 0x50020000, 7, 7, 264, 152, 0x00000000
PUSHBUTTON "&Close", 201, 5, 275, 40, 15, 0, WS_EX_LEFT
CONTROL "", 102, "TBtnBmp", 0x50000000, 280, 5, 30, 25, 0x00000000
}
TEST DIALOG 49, 52, 365, 295
STYLE DS_SETFONT | WS_CHILDWINDOW
FONT 8, "MS Sans Serif"
{
EDITTEXT 101, 47, 11, 40, 14, ES_AUTOHSCROLL, WS_EX_LEFT
EDITTEXT 102, 47, 31, 164, 14, ES_AUTOHSCROLL, WS_EX_LEFT
AUTOCHECKBOX "Prueba de checkbox", 103, 47, 55, 82, 8, 0, WS_EX_LEFT
EDITTEXT 104, 171, 51, 40, 14, ES_AUTOHSCROLL, WS_EX_LEFT
LTEXT "Edad", -1, 146, 53, 18, 9, SS_LEFT, WS_EX_LEFT
LTEXT "Codigo", -1, 11, 11, 23, 9, SS_LEFT, WS_EX_LEFT
LTEXT "Nombre", -1, 11, 31, 26, 9, SS_LEFT, WS_EX_LEFT
}
//
// Manifest resources
//
1 RT_MANIFEST ".\\manifest.xml"
