From: Sandro R. R. F. <san...@ya...> - 2004-12-07 16:07:15
|
Hi Alexander In line 175 after ELSEIF wParam == VK_TAB // Tab IF Asc( Substr( GetKeyboardState(), VK_SHIFT+1, 1 ) ) >= 128 GetSkip( oParent,::handle,-1 ) ELSE GetSkip( oParent,::handle,1 ) ENDIF last ELSEIF wParam == VK_TAB // Tab IF Asc( Substr( GetKeyboardState(), VK_SHIFT+1, 1 ) ) >= 128 SetFocus( GetNextDlgTabITem ( oParent:handle , ::handle, .t. ) ) ELSE SetFocus( GetNextDlgTabITem ( oParent:handle , ::handle, .f. ) ) ENDIF -- Fausto Di Creddo Trautwein Adler - Informática Cambará - PR The sugestions, is use in form WS_TABSTOP, the key tab navigate for the controls. Regards Sandro Freire |