Just This....

OPEN DATABASE ".\dados\restaurant" shared
SELECT codigo,garcom FROM mesas INTO CURSOR openmesas WHERE status = .t.
thisform.grid1.RecordSource="openmesas"

thisform.grid1.column1.Width= 40
thisform.grid1.column2.Width= 110
thisform.grid1.column1.text1.Click