borrar al perder foco

[Cosgaya]

hola a todos:
como puede hacer para que se ejecute una condicion al perder el foco
gracias

[[Luis M.]]

Supongo que en el evento OnExit del componente.
Un saludo.

[cuburu]

Mi camarada Luis M. tiene razon, tienes que utilizar el metodo OnExit del objeto, para el caso de que sea un objeto tipo TEdit, podrias utilizar esto:

Edit1.clear;

pero si quieres que este mismo código se aplique a cualquier objeto tipo edit usa algo parecido a esto:

IF (Sender is TEdit) then
TEdit(Sender).clear;

Este metodo lo heredas a todos los objetos que sean del mismo tipo y funciona.

Disculpa si tiene algún tipo de error conforme a la sintaxis pero es debido a que hace tiempo que no trabajo Delphi.