>*!* Set to default = -1, which specifies that the Grid control should contain >*!* enough columns to accommodate all the fields in the grid's record source. >oGrid.ColumnCount = -1 >*!* Set correct recordsourcetype >if oGrid.RecordSourceType # 1 > oGrid.RecordSourceType = 1 && alias >endif >*!* get the DE >= aselobj(aAns,2) >oDE = aAns[1] >oGrid.RecordSource = oDE.Cursor1.Alias >*!* change columns to cusColumn >for nCol = 1 to oGrid.ColumnCount > with oGrid > cColumn = "Column" + alltrim(str(nCol)) > .RemoveObject(cColumn) > .AddObject(cColumn, "cusColumn") > endwith >endfor > >>