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