Patricio,
Puedes proporcionar un ejemplo para probarlo ? Para poder reproducirlo aqui, gracias
Patricio,
Puedes proporcionar un ejemplo para probarlo ? Para poder reproducirlo aqui, gracias
Antonio,
probado el ejemplo que me envias y sigue borrando los controles.
estoy probando en mi sistema avanzando con "RETURN" en los controles y cuando pasa por un combobox o checkbox la linea punteada no aparece, unicamente usando el TAB
gracias
paco
Paco,
Que versión de FWH estás usando ?
Antonio,
usando fwh1103 + bcc582 + xharbour
saludos
paco
IF !Empty( ::aControls ) .and. hCtrl == ::LastActiveCtrl():hWnd
IF !Empty( ::oWnd ) .and. ( ( Upper( ::oWnd:ClassName() ) $ "TFOLDER;TPAGES;TFOLDEREX" ) )
hCtlNext = NextDlgTab( ::oWnd:oWnd:hWnd, ::oWnd:hWnd )
::hCtlFocus := hCtrl
IF hCtlNext != hCtrl
SetFocus( hCtlNext )
ENDIF
ENDIF
ELSE
SendKey( VK_TAB )
ENDIF