DELETE FILE ROCheckbox.SC? RECYCLE * Make a form CREATE FORM ROCheckbox NOWAIT LOCAL laObject[1], lo ASELOBJ(laObject,1) lo = laObject[1] * Add a grid with 1 column lo.ADDOBJECT('grid1','grid') lo.Grid1.COLUMNCOUNT = 1 * Make a simple cursor so the grid has something * to bind to. Note, though, that this isn't * necessary to trigger the issue. lo.WRITEMETHOD("Load",; "CREATE CURSOR temp (l1 l)" + CHR(13) + ; "APPEND BLANK") * Add code to the Grid's Init() to add a * checkbox at runtime and confirm it's invisible. lo.Grid1.COLUMNS(1).WRITEMETHOD("Init",; "THIS.ADDOBJECT('check1','checkbox')" + ; CHR(13) + ; "THIS.CURRENTCONTROL = 'Check1'" + ; CHR(13) + ; "Messagebox('Check1.Visible='+" + ; "TRANSFORM(This.Check1.Visible))") * Save and run the form. KEYBOARD '{CTRL-W}' DOEVENTS FORCE DO FORM ROCheckbox