на форме есть комбо и текстбокс. При выходе нажатии enter в комбо
фокус нормально переходит на grid, а в случае с текстбоксом
фокус переходит на первый элемент по табордеру.
Приведу еще код
Обработка нажатия у комбо:

rpos = pr.sisnom
rsnaim = pr.snaim
rgor = pr.gor
rtel = pr.tel
thisform.rpos=rpos
thisform.rsnaim=rsnaim
thisform.rgor=rgor
thisform.rtel=rtel
IF rpos<>100 THEN
thisform.label12.Visible= .T.
thisform.label12.Caption=rgor
thisform.label13.Visible= .T.
thisform.label13.Caption=rtel
thisform.grid_focus
ELSE
thisform.label12.Visible= .T.
thisform.label12.Caption='№'
thisform.text9.Visible= .T.
thisform.text9.SetFocus
ENDIF

код текстбокса:

LPARAMETERS nKeyCode, nShiftAltCtrl
DO CASE
CASE nkeycode=13

SELECT 5
SET ORDER TO dis1
IF SEEK(thisform.text9.Value)
rgr = dis.nomdis
rfam = ALLTRIM(dis.fam)
thisform.label14.Visible= .T.
thisform.label14.Caption=rfam

ELSE
SET ORDER TO dis1
DO FORM seldis TO rrec
IF EMPTY(rrec) then
thisform.Release
DO FORM prnak
SELECT crspr
ELSE
SELECT 5
GO rrec
rfam=fam
rgr=nomdis

thisform.label14.Visible= .T.
thisform.label14.Caption=rfam
SELECT crspr
ENDIF
ENDIF
SELECT crspr
thisform.grid_focus
ENDCASE

и код thisform.gridfocus:

SELECT crspr
APPEND BLANK
thisform.grid1.SetFocus
thisform.Refresh

Заранее всем спасибо

Проблема решилась. Но как-то странно.
Поставил в combo. grid.setfocus,
а в textbox.keypress пришлось ставить
sele курсор
append blank.
Если в textbox.keypress вставить
grid.setfocus, то grid его получает,
а затем отдает автоматом
первому контролу на форме