>MyGrid.RecordSourceType = Alias.
>
>MyGrid.RecordSource:
>
>

>AppointmentTypeSets.Colors,FromDate,ToDate,Day,StartTime,EndTime
>

>
>The grid is not populating, though the Alias has records.
>
>If I just put this:
>
>

>AppointmentTypeSets
>

>
>Then the grid populates, but not in the field order that I want.
>
>I now remember why I started to not like grids many years ago. They are a pain to work with.

Jay,
You're trying to use grid like a listbox.

local ix,lcColumnSources
lcColumnSources = 'Colors,FromDate,ToDate,Day,StartTime,EndTime'
alines(aCols, m.lcColumnSources,.t.,',')
with thisform.myGrid
  .Recordsource = 'AppointmentTypeSets'
  For ix=.ColumnCount To 1 Step -1
    If Ascan( aCols, Justext(.Columns( m.ix ).ControlSource), 1,-1,1,15) = 0
      .DeleteColumn(m.ix)
    Endif
  Endfor
  For ix=1 To .ColumnCount
    .Columns(m.ix).ColumnOrder = ;
      ascan( aCols, Justext(.Columns( m.ix ).ControlSource), 1,-1,1,15)
  Endfor
Endwith

Cetin