>>>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 >>endfor >>>>
>>* 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, pardon me. >Uses ><pre> >... and LIKE(lower(m.tcNamePrefix)+'*',lower(.Name)) >>it is more readable and not require SET EXACT OFF