Clipper/FiveWin - Problemas con Setfocus()

Hola amigos del foro

Tengo el siguiente problema, tengo un dialogo con 10 controles, entre gets y buttons.

define dialog...
redefine get oget[1] var odbf:cuenta ....
redefine get oget[1] var odbf:nombre ....
redefine get oget[1] var odbf:dh ....
redefine get oget[1] var odbf:importe ....
redefine button oBtn[1] action grabar()
redefine button oBtn[1] action oDlg:end()
activate dialog...
lo que quiero es que al presionar el boton de grabar el cursor vaya al get1, he usado el oget[1]:setfocus, pero pasa el foco al boton de salir...
Que puedo hacer? Quisiera saber en que numero de control me encuentro para hacer oDlg:aControls[numero]:Setfocus()...

Ayuda por favor...

Uso clipper5.3, fw2.0, blinker4.0, workshop4.0,tdbf12, con indices cdx
Salu2

Francis:

En la función GRABAR() prueba agregando estas dos líneas inmediatamente antes del RETURN

oDlg:SetFocus()
oGet[1]:SetFocus()

Desde luego debes recibir los dos parámetros en la función grabar() y te quedaría así.

redefine button oBtn[1] action grabar(oDlg,oGet)

FUNCTION GRABAR(oDlg,oGet)
.....
.....
oDlg:SetFocus()
oGet[1]:SetFocus()
RETURN((.T.))

El Duro

Voy a probarlo amigo....

Gracias de antemano

Salu2