Hi Fabio,

Nice. What limitations has this method?

I've tried a little example, which unfortunately does not work for me in VFP9:

oForm = CreateObject('myForm')
oForm.OverloadObject('atextbox','datetextbox','')
oForm.Show(1)

Define Class myForm as Form
   Add Object atextbox as textbox
   
   Procedure OverloadObject(cName,cClass,cClassLib)
     form::Removeobject(m.cName)
     form::Newobject(m.cName,m.cClass,evl(m.cClassLib,''))
   EndProc
EndDefine 

Define Class datetextbox as textbox
   Format = 'D'
EndDefine  

I get the error "Objectname is invalid" at the line form::Newobject. What did I misunderstood?

Bye, Olaf.