******************************************************************** * Description.......: GridBuilder - allows to build a grid in design-time * Calling Samples...: * Parameter List....: * Created by........: Cetin Basoz * Modified by.......: ******************************************************************** *custom builder not registered aselobj(arrObj) for each oObj in arrObj if upper(oObj.baseclass)='GRID' for each oColumn in oObj.columns if type('oColumn.text1')="O" oColumn.removeobject('text1') endif if oColumn.Header1.Caption<>"Notes" oColumn.newobject('text1','addringrid','addrstd.vcx') endif next endif next