>Hi,
>
>I have a form with a grid showing child records. I have a control button to print out child records - but would like to check for an empty grid, so that the report will print only if there are any records to be printed. Hve tried, but have not found any way in which to test for any empty/not empty status fof the grid.
>
>I find the record pointer for the row source dbf always showing eof.
>
>I would be surprised if this does not have a simple solution...
>
>Rolf

In the Refresh of the command:

local llEnabled, lcAlias
llEnabled = .t.
lcAlias = ThisForm.GridName.RecordSource
if not used(lcAlias)
   llEnabled = .f.
else
   if reccount(lcAlias) = 0 or eof(lcAlias)
      llEnabled = .f.
   endif
endif
This.Enabled = llEnabled