Olá
Existe algum metodo para abrir o calendario quando o get ganhar foco ?
Exemplo:
REDEFINE DTPICKER oCalend VAR dDataCalend ID 400 OF oDlgUser
oCalend:bGotFocus := {|| oCalend:Show() }
João Cezar - Goiânia/GO.
Tal vez pudiésemos enviarle un mensaje WM_LBUTTONDOWN como si se pulsase con el ratón para abrirlo, pero hay que calcular las coordenadas en donde hacerlo.
@ 2, 2 DTPICKER oDtp VAR dDate OF oWnd ON CHANGE If( oSay != nil, oSay:Refresh(),)
oDtp:bGotFocus = { || oDtp:PostMsg( WM_LBUTTONDOWN, 0, nMakeLong( oDtp:nWidth - 5, 3 ) ) } METHOD Open() INLINE ::PostMsg( WM_LBUTTONDOWN, 0, nMakeLong( ::nWidth - 5, 3 ) ) @ 2, 2 DTPICKER oDtp VAR dDate OF oWnd ON CHANGE If( oSay != nil, oSay:Refresh(),)
oDtp:bGotFocus = { || oDtp:Open(), nil }Gracias Maestro,
Funcionou corretamente, mas apenas abre o calendario se a ultima tecla pressionada foi a tecla TAB, se finalizo o GET anterior com ENTER o calendario não abre, teria como abrir se foi pressionado ENTER ?
João Cezar - Brasil - Goiânia/GO.
João,
Puedes mostrar un pequeño PRG aqui para que lo probemos ? gracias
Antonio,
Me desculpe, fui fazer a prova com fwh806 e funcionou corretamente, o problema é que essa alteração eu estava fazendo em um software que é linkado com fwh2.7, pois ainda não pude alterar meus fontes para ultima versão do fwh.