>f_form.setall('destroy','nEditBox') >>
>this.parent.removeobject(this.name) >
*Custom removeobjects method lparameters toContainer, tcClass, tcNamePrefix local ix tcNamePrefix = iif(empty(m.tcNamePrefix),'',m.tcNamePrefix) For ix=toContainer.ControlCount to 1 step -1 With Evaluate('toContainer.'+toContainer.Controls(m.ix).Name) If lower(.Class) == lower(m.tcClass) and lower(.Name) = lower(m.tcNamePrefix) toContainer.RemoveObject(.Name) endif endwith endforA button calling custom method:
* Remove all nEditbox class instances that are members of thisform thisform.RemoveObjects(thisform,'nEditBox') * or * Remove all nEditbox class instances that are members of thisform where name starts with 'a' thisform.RemoveObjects(thisform,'nEditBox','a')Cetin