AFAIK, you have to bind to the event of a specific control. In all the INIT methods of your baseclass controls, you could put the following:

BINDEVENT(THIS, "LostFocus", ThisForm, "FocusChange")

Update:

or in your form baseclass Init, you could loop through the OBJECTS collection:

for each loControl in this.controls
   if pemstatus(loControl, 'LOSTFOCUS', 5)
      BINDEVENT(loControl, "LostFocus", ThisForm, "FocusChange")
   endif
endfor

>Hi
>
>I need fire one methods before/after ActiveControl change value.
>
>I write on form.Init()
> BINDEVENT(thisform,"ActiveControl",thisform,"FocusChange")
>
>and add this methods:
>
>PROCEDURE FocusChange
> lparameters ofocus
> messagebox(ofocus.Name+" change focus")
>RETURN
>
>but it does not happen null.
>
>I mistaken?
>Is another bug ?
>
>If someone me helps thanks to it.
>
>Fabio