>Is there any way to "On Error Do myErrorHandler with THIS"?
>I've tried "... with iif(type('THIS')='O',THIS,.F.)", but I never receive an Object in myErrorHandler.

You could also put error handling logic in the Error event of the class. Something like:

procedure Error(tnError, tcMethod, tnLine)

* If I can't handle this error at the class level, pass it to a global error handler
if NOT this.HandleError(tnError, tcMethod, tnLine)
     MyErrorHandler(this, tnError, tcMethod, tnLine)
endif
endproc