Forzar Foco en Get

Post Reply
User avatar
MarioG
Posts: 1356
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Forzar Foco en Get

Post by MarioG »

Hola gente:

Tengo un dialog, desde codigo, con un combo y un get. El foco inicilal lo tiene el Como. Bajo cierta condición quiero que lo tenga el Get. Para ello hago

desde el ON INIT del Dialog hago:
if( !Empty( oSelf:cUser ), ( aO[_Cmb]:oJump:= aO[_Get1], aO[_Get1]:SetFocus() ), )

Pero el foco sigue apareciendo en el Combo. que está mal?
gracias
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
manuramos
Posts: 219
Joined: Mon Dec 26, 2005 7:25 pm
Location: Jerez de la Frontera (Spain)

Post by manuramos »

Intenta:

PostMessage(aO[_Get1]:hWnd,FM_CHANGEFOCUS)

Un saludo.
Nos Gusta Programar
User avatar
MarioG
Posts: 1356
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Post by MarioG »

Manuramos, Duro de roer... no "andó"
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
fleal
Posts: 234
Joined: Tue Oct 25, 2005 12:39 am
Location: México, DF

asi lo haría yo

Post by fleal »

Mario,

if( Empty( oSelf:cUser ), aO[_Get1]:SetFocus() , .T. )


Si lo anterior no funciona, usamos la fuerza bruta.
Deshabilito el combo al entrar, asi el foco no tiene más opción que irse al siguiente control.

if( !Empty( oSelf:cUser ), ( aO[_Cmb]:disable(), aO[_Get1]:SetFocus() ), )
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Mario,

Desde la claúsula ON INIT tienes que devolver .f. para que Windows acepte dar el foco a otro control:

... ON INIT ;
if( !Empty( oSelf:cUser ), ( aO[_Cmb]:oJump:= aO[_Get1], aO[_Get1]:SetFocus(), .f. ), )
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
MarioG
Posts: 1356
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Post by MarioG »

Antonio; muchas gracias!.
Tendría que haberlo preguntado hace mucho :-)... ya no recuerdo desde hace cuanto que lo intento y me resignaba a dejarlo sin solución.
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
Post Reply