>>Thank you.
>This solves the problem.
>Can you explain me the effect of the lines:
>Textbox::Gotfocus
>and then
>NODEFAULT

Bruno:

It is an older, seldom used feature to force a method to run inherited code from the named class, in this example the base class, possibly bypassing the normal inheritance chain. Not sure why he used that in his example.

NODEFAULT tells VFP not to execute the normal behaviours (inheritance, events, etc.).

HTH