FOR EACH loAppControl IN thisform.cntButtons.objects thisform.cntButtons.RemoveObject(loAppControl.name) ENDFOR SELECT vapps REQUERY() SCAN FOR vapps.lactive NewButton='cmd'+ALLTRIM(vapps.cObjName) thisform.cntButtons.addobject(NewButton,'MenuButton') NewTimer='tmr'+ALLTRIM(vapps.cObjName) thisform.cntButtons.AddObject(NewTimer,'ButtonTimer') endscan