>LPARAMETERS nKeyCode, nShiftAltCtrl > >IF nKeyCode = 27 && Escape Key causes problem in control source of grid. > NODEFAULT >ENDIF > >DO CASE > CASE nKeyCode = 9 > This.Parent.Width = 0 > This.Parent.Parent.grcProduct.Width = 244 > > CASE nKeyCode = 15 > This.Parent.Width = 0 > This.Parent.Parent.grcDiscription.Width = 244 > >ENDCASE > >DODEFAULT(nKeyCode, nShiftAltCtrl) > >>