- Code: Select all Expand view
REDEFINE GET get_planta VAR m_planta ID 101 OF oDlg23 PICTURE '##' ;
BITMAP ( GETRESOURCES(), 2008 ) ;
ACTION ( DIS_PLAN(1,aContl,oQSet[nQSet],"kselle",1,m_planta,@m_planta,@get_planta,oSaT),;
get_planta:Refresh(), get_planta:SetFocus() ) ;
VALID DIS_PLAN(0,aContl,oQSet[nQSet],"kselle",1,m_planta,@m_planta,@get_planta,oSaT)
REDEFINE GET get_tipsel VAR m_tipsel ID 102 OF oDlg23 PICTURE "!"
REDEFINE GET get_nombre VAR m_nombre ID 103 OF oDlg23 PICTURE "@KS30"
REDEFINE GET get_valor VAR m_valor ID 104 OF oDlg23 PICTURE "999.99"
REDEFINE CHECKBOX g_status VAR x_status ID 105 OF oDlg23
Cuando le digo modificar Desactivo los get get_planta y get_tipsel y me posiciono con un SetFocus() en get_nombre, efectivamente quedan desactivados los get, pero el recurso asignado al get planta si coloco el puntero en el me despiega la lista y deberia estar desactivo, mi pregun es no deberia quedar desactivo con solo desactivas el get_planta.
Esto es si coloco el puntero en la posicion planta pero si estoy ubicado en nombre al darle enter hay si se desactiva el recurso del get_planta.
Como podre soli¿ucionar este caso.
Ver Imagen
[img]
http://imageshack.us/photo/my-images/695/dibujo22v.jpg/
[/img]
- Code: Select all Expand view
get_planta:disable()
get_tipsel:disable()
get_nombre:enable()
get_valor:enable()
g_status:enable()
get_nombre:Setfocus()
Perdon ya encontre el error , cosas que pasan.