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' EndDefineI get the error "Objectname is invalid" at the line form::Newobject. What did I misunderstood?