Página 1 de 1
Error en ArrayBrowse: lUseReturn y oBrowse:OnKeyDown
Publicado: Mar Nov 29, 2005 6:43 pm
por joseluis
Hola,
En un arraybrowse tengo:
METHOD ArrayBrowse( oSender, nKey, nFlags ) CLASS tFrmFormaPago
IF nKey == VK_RETURN
logdebug("PASA POR AQUI")
oSender:Edit()
ENDIF
RETURN Nil
Si tengo puesto
Application:lUseReturn := .F.
y pulsamos la tecla intro estando en el browse, aparece el logdebug y
entramos en edición.
Sin embargo, si
Application:lUseReturn := .T.
y pulsamos la tecla intro estando en el browse, aparece el logdebug
_pero_ el foco se va al siguiente control.
Espero haberme explicado bien.
Saludos,
José Luis Capel
Error en ArrayBrowse: lUseReturn y oBrowse:OnKeyDown
Publicado: Mar Nov 29, 2005 7:31 pm
por ignacio
José Luis,
Cambia RETURN NIL por RETURN 0 cuando es VK_RETURN
Saludos,
"José Luis Capel" <
joseluis@iaicom.com> escribió en el mensaje
news:438c9442$[email=
1@ozsrvnegro.ozlan.local...]
1@ozsrvnegro.ozlan.local...[/email]
> Hola,
>
> En un arraybrowse tengo:
>
> METHOD ArrayBrowse( oSender, nKey, nFlags ) CLASS tFrmFormaPago
> IF nKey == VK_RETURN
> logdebug("PASA POR AQUI")
> oSender:Edit()
> ENDIF
> RETURN Nil
>
> Si tengo puesto
>
> Application:lUseReturn := .F.
>
> y pulsamos la tecla intro estando en el browse, aparece el logdebug y
> entramos en edición.
>
> Sin embargo, si
>
> Application:lUseReturn := .T.
>
> y pulsamos la tecla intro estando en el browse, aparece el logdebug _pero_
> el foco se va al siguiente control.
>
> Espero haberme explicado bien.
>
> Saludos,
> José Luis Capel
Error en ArrayBrowse: lUseReturn y oBrowse:OnKeyDown
Publicado: Mar Nov 29, 2005 7:39 pm
por joseluis
Ignacio,
Funciona!!! Muchas gracias!!!
Saludos,
José Luis Capel
Ignacio Ortiz de Zúñiga escribió:
> José Luis,
>
> Cambia RETURN NIL por RETURN 0 cuando es VK_RETURN
>
> Saludos,
>
> "José Luis Capel" <
joseluis@iaicom.com> escribió en el mensaje
> news:438c9442$[email=
1@ozsrvnegro.ozlan.local...]
1@ozsrvnegro.ozlan.local...[/email]
>
>>Hola,
>>
>>En un arraybrowse tengo:
>>
>>METHOD ArrayBrowse( oSender, nKey, nFlags ) CLASS tFrmFormaPago
>> IF nKey == VK_RETURN
>> logdebug("PASA POR AQUI")
>> oSender:Edit()
>> ENDIF
>>RETURN Nil
>>
>>Si tengo puesto
>>
>>Application:lUseReturn := .F.
>>
>>y pulsamos la tecla intro estando en el browse, aparece el logdebug y
>>entramos en edición.
>>
>>Sin embargo, si
>>
>>Application:lUseReturn := .T.
>>
>>y pulsamos la tecla intro estando en el browse, aparece el logdebug _pero_
>>el foco se va al siguiente control.
>>
>>Espero haberme explicado bien.
>>
>>Saludos,
>>José Luis Capel
>
>
>