Probando el CheckBoxMod

[bingen]

Buenas xTeam, estoy probando este control y me encuentro con un comportamiento "extraño".

En el CheckBox viejo haciendo
:OnChange := {|oSender| Logdebug(oSender:lChecked) }
me informa del estado una vez cambiado
Y en el moderno
:OnChange := {|oSender| Logdebug(oSender:lChecked) }
me informa del estado antes de cambiar

Estaba cambiando el uno por el otro y de repente hay cosas que empiezan a funcionar mal ?¿?¿¿?¿?

Pues era eso y por compatibilidad opino que el comportamiento ha de ser idéntico.

Gracias.

[ignacio]

Buenos días,

Siento el inconveniente, pero creo que TCheckBoxMod lo hace mejor que TCheckBox. Por varios motivos:

1) Por coherencia con el nombre del método: OnChange y no OnChangeD

2) Porque el parámetro se pasa por referencia y además si se devuelve un valor FALSO no se produce el cambio

Son dos controles distintos y por lo tanto tampoco pretenden ser absolutamente idénticos. En todo caso, se aprovecha el nuevo control para subsanar los pequeños errores que tenía el control básico.

Un saludo

Nota: Recomiendo realizar un cambio másivo de oSender:lChecked por el parámetro lValue

[bingen]

No tengo ninguna duda de que es mejor, el CheckBox original siempre me ha parecido una chapuza, tiene bastantes carencias, como no poder cambiar el fuente junto al resto de los labels o su color.

Pero el parámetro lValue ?¿??¿? no lo encuentro.

[ignacio]

TCheckBoxMod:OnChange( oSender, lValue )