*!* 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 endforHTH,