¿Cómo eliminar el texto de un TEdit con clearingeditstyle en Firemonkey?

3309 vistas

El estilo clearingeditstyle de un componente TEdit en Firemonkey nos agrega un botón con una cruz dentro del área de entrada del texto,  ese botón permite al usuario borrar el texto haciendo clic sobre ella.

 

Sin embargo, hasta la versión XE8, cuando se coloca la propiedad de estilo de un TEdit a clearingeditstyle (por el inspector de objetos), el botón aparece en el cuadro de entrada, pero no pasa nada cuando el usuario haga clic en ese botón (el texto no se elimina).

 

Hay una solución para ello, en la vista de obejtos (Object TreeView) haz un click derecho al mouse encima del TEdit y seleccione 'Agregar elemento' -> TClearEditButton. Esto agrega el botón en el cuadro de entrada, pero esta vez, haga clic en ese botón para realizar la acción de limpieza.