Código en Delphi 6, válido para Delphi for win32 y CodeGear RAD Studio (Delphi win32)
Home
Download
Documentos
Links
Historial
Correo

EditCheck


El componente EditCheck es descendiente de TCustomEdit y hereda de él todas sus propiedades y métodos. La característica que lo diferencia de este control es que dentro del mismo aparece un Checkbox que cambiará el comportamiento de la caja de edición.

Funcionamiento:

El checkbox marcado nos indicará que no ha habido ningún cambio dentro del texto desde que éste se marcó, cualquier cambio en el texto de la caja de diálogo desmarcaría el check.
Ahora bien tenemos también la posibilidad de que al marcar el checkbox hagamos que no se pueda modificar el texto (excepto por programa) mediante la propiedad LetChange:=true;.
También es posible desactivar el checkbox, propiedad CheckEnabled

Pasamos a exponer las nuevas propiedades :

Propiedades

Alignment : Justificación del texto.
Checked : Checkbox marcado/desmarcado (true/false).
CheckEnabled: Checkbox activado o no (true/false).
FocusedColor: Color que aparecerá alrededor del Checkbox cuando éste tenga el foco.
LetChange: Permite cambios con checkbox marcado (true/false).

Eventos

OnCheckboxClick: Ocasionado por el cambio del checkbox.