Xailer & OZ Software

Bom dia,
Para navegar entre 2 ou mais TMaskEdit, sem o mouse, o TAB funciona.
Como fazer para usar também o ENTER ou TAB?
Grato
Mário
www.eMeAsOfT.com.br

Coloca al principio de tu aplicación:
Application:lUseReturn := .T.
Con esto creo que te sirve.
Saludos:
Paco V
"Mário Angelini" <mario.angelini1@gmail.com> escribió en el mensaje
news:49da0dac$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Bom dia,
> Para navegar entre 2 ou mais TMaskEdit, sem o mouse, o TAB funciona.
> Como fazer para usar também o ENTER ou TAB?
> Grato
> Mário
> www.eMeAsOfT.com.br

Paco,
perfecto!!
gracias
"Paco V." <ssi-estono-@ono.com> escreveu na mensagem
news:49da1095$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Coloca al principio de tu aplicación:
> Application:lUseReturn := .T.
>
> Con esto creo que te sirve.
>
> Saludos:
>
> Paco V
>
> "Mário Angelini" <mario.angelini1@gmail.com> escribió en el mensaje
> news:49da0dac$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Bom dia,
>> Para navegar entre 2 ou mais TMaskEdit, sem o mouse, o TAB funciona.
>> Como fazer para usar também o ENTER ou TAB?
>> Grato
>> Mário
>> www.eMeAsOfT.com.br
>
>

Saludos:
También puedes hacer que se navegue con la teclas arriba y abajo mira un
mensaje en el foro normal del dí­a 25/02/2009 que la pregunta está en
portugués.
"Como faço para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???"
José Ramón Castro.
Mário Angelini escribió:
> Bom dia,
> Para navegar entre 2 ou mais TMaskEdit, sem o mouse, o TAB funciona.
> Como fazer para usar também o ENTER ou TAB?
> Grato
> Mário
> www.eMeAsOfT.com.br

> También puedes hacer que se navegue con la teclas arriba y abajo mira un
> mensaje en el foro normal del dí­a 25/02/2009 que la pregunta está en
> portugués.
>
> "Como faço para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???"
>
> José Ramón Castro.
>
>
Otra vez.
No puedo encontrar este mensaje en en cualquier foro news.xailer.
Help me.
Mário

Saludos:
Sigue este enlace
http://www2.xailer.com/cgi/dnewsweb.exe ... cmd=xsearc h&group=local.xailer.spanish&group=local.xailer.span ish&key=Como+fa%E7o+para+navegar+com+as+TECLAS+DE+SETA%2 C+PARA+CIMA%2C+PARA+BAIXO.%3F%3F%3F&action=Search+Xover
José Ramón Castro.
Mário Angelini escribió:
>> También puedes hacer que se navegue con la teclas arriba y abajo mira
>> un mensaje en el foro normal del dí­a 25/02/2009 que la pregunta está
>> en portugués.
>>
>> "Como faço para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???"
>>
>> José Ramón Castro.
>>
>>
>
> Otra vez.
> No puedo encontrar este mensaje en en cualquier foro news.xailer.
> Help me.
> Mário
>

Saludos:
Mário Angelini escribió:
>> También puedes hacer que se navegue con la teclas arriba y abajo mira
>> un mensaje en el foro normal del dí­a 25/02/2009 que la pregunta está
>> en portugués.
>>
>> "Como faço para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???"
>>
>> José Ramón Castro.
>>
>>
>
> Otra vez.
> No puedo encontrar este mensaje en en cualquier foro news.xailer.
> Help me.
> Mário
>
Yo lo tengo implementado de otra forma, te la adjunto y usas la que
quieras, este código lo tengo en el primer formulario de mi aplicación
donde tengo el Procedure Main()
CLASS TEdit FROM XEdit
PUBLISHED:
PROPERTY nClrPaneFocus INIT RGB( 255, 255, 192 )
PROPERTY nClrBorder INIT RGB( 73, 218, 120) EDITOR PE_Color
PUBLIC:
METHOD WMKeyDown( nKey, nFlags )
METHOD WMNCPaint()
ENDCLASS
//---------------------------------------------------------- --------------------
METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
IF nKey == VK_UP
::GoPrevControl()
ELSEIF nKey == VK_DOWN
::GoNextControl()
ELSE
RETURN Super:WMKeyDown( nKey, nFlags )
ENDIF
RETURN 0
//---------------------------------------------------------- -----------------------
#pragma BEGINDUMP
#include "windows.h"
#include "xailer.h"
#include "colors.ch"
XA_FUNC_STATIC( TEDIT_WMNCPAINT )
{
PHB_ITEM Self = hb_stackSelfItem();
HWND hWnd = GetHandleOf( Self );
if( XA_ObjGetL( Self, "lFocused" ) )
{
HDC hdc = GetWindowDC( hWnd );
RECT rect;
HBRUSH hbr = CreateSolidBrush( (COLORREF) XA_ObjGetNL( Self,
"nClrBorder" ) );
GetWindowRect( hWnd, &rect );
rect.right -= rect.left;
rect.bottom -= rect.top;
rect.left = 0;
rect.top = 0;
FrameRect( hdc, &rect, hbr );
InflateRect( &rect, -1, -1 );
FrameRect( hdc, &rect, hbr );
DeleteObject( hbr );
}
else
PrevWindowProc( hWnd, WM_NCPAINT, hb_parnl( 1 ), 0 );
hb_retnl( 0 );
}
#pragma ENDDUMP