>hi all,
>
>i am generating a cursor dynamically and need to populate a grid with the contents of the cursor. the number of columns in the cursor vary every time hence will the columns of the grid.
>
>how can i achieve this result ? and, i want to set the width of every column to some fixed width too - say 50 . how can i achieve this ? will a for...next loop accomplish the task ?
>
>finally, i need to change the font colour of certain values in the grid to RED if they fall short of a certain condition. how can i do this given that the column names of the grid can vary and are not constant every time ?
>
>hope i am understood.
>
>with sincere thanks.

An example will best descibe how:

With Thisform
  .LockScreen		= .T.
  .nOrderNum		= 0
  With .pgfMainPageFrame
    With .Page3.grdRouteStops
      .FontSize		= 9
      .RecordSourceType	= 1	               && alias
      lcSetZoneCsr		= thisform.cSetZoneCsr  && Current cursor name stored in form property	
      .RecordSource	= ""
      .RecordSource	= ( lcSetZoneCsr)		
      .ColumnCount		= 6
      With .Columns(1)
        .FontBold		= .T.
        .ControlSource	= "NUM"
        .Header1.Caption	= "No."
        .Header1.FontBold	= .T.
        .Bound		= .T.
        .Width		= 33
        .Text1.Visible	= .T.
      EndWith		&& .Columns(1)
 
      With .Columns(2)
        .FontBold		= .T.
        .ControlSource		= "ZONE"
*       etc.
  EndWith
  .LockScreen		= .F.
EndWith  && Thisform