Oi Dionisio,

Crie uma propriedade no TextBox e a inicie com .F. (dê o nome Muda, por exemplo). No método InteractiveChange atribua .T. para esta propriedade, assim se o usuário teclar algo ela será mudada para .T., então no LostFocus verifique se a propriedade Muda é verdadeira e pronto.

if this.muda
** faz o que tem que fazer
this.muda=.f. && Ou coloque o código para voltar a falso no GotFocus
endif

Abraços

Marcos Martins