FiveTech Software tech support forums

Andrés, prueba a sustituir PostMessage( ::hWnd, WM_KEYDOWN, 13 ) por: PostMessage( oCtrl:hWnd, WM_SETFOCUS )

Si no funciona prueba con: PostMessage( oCtrl:hWnd, FM_CHANGEFOCUS )

En ambos casos, oCtrl sería el control que quieres que tome el foco.

... bClicked, bMoved, bPainted, lCentered, bValid, lModal,; bInit, bRClicked, bWhen, lResize16 ) METHOD AdjTop() INLINE WndAdjTop( ::hWnd ) METHOD ChangeFocus() INLINE PostMessage( ::hWnd, FM_CHANGEFOCUS ) METHOD Close( nResult ) METHOD Command( nWParam, nLParam ) METHOD CtlColor( hWndChild, hDCChild ...

Prueba esto al final de la lectura:

PostMessage(oGet:hWnd,WM_SETFOCUS)

o bien

PostMessage(oGet:hWnd,FM_CHANGEFOCUS)


Suerte

Intenata:

PostMessage(oGets[8]:hWnd, WM_SETFOCUS)

o

PostMessage(oGets[8]:hWnd, FM_CHANGEFOCUS)

I prefer: PostMessage( oObj:hWnd,FM_CHANGEFOCUS) or SendMessage( oObj:hWnd,FM_CHANGEFOCUS) or PostMessage( oObj:hWnd,FW_SETFOCUS) or SendMessage( oObj:hWnd,FW_SETFOCUS) Depending the situation. SendMessage is inmediate, PostMessage waits at the end of the Commands queu. FM_CHANGEFOCUS seems to be mo...

Jose Luis, > Error description: Error BASE/1086 Argument error: ++ > REDEFINE SBUTTON oBtn1 ID 550 OF oDlg RESOURCE "Lamp1", "Lamp2",, "Lamp3", 'shape3' SHAPE PROMPT "Aceptar" TEXT ON_RIGHT ; ACTION iif( ValidaUser(cClave, @oClave,"C" ) ,; (Seguir:=.T., SEAT1->(rlock()),SEAT1->Activo:=.t...

Hola Esta noche he empezado a pasar todo otra vez ahora a xharbour como me ha recomendado Joao, a ver si se acaban los problemas de la migración y puedo dedicarme a la programación en sí. Después de compilar para xharbour librerias que tenía para harbour, me da error en tsbutton. *******************...

Gracias Antonio He instalado todo de nuevo, y ahora ya no me da errores de compilación, al ejecutar el programa me da el siguiente error: ********************************* Application =========== Path and name: C:\mocwinpruebas\GESPAQ.EXE (32 bits) Size: 769,024 bytes Time from start: 0 hours 0 mins...

Intenta:

PostMessage(aO[_Get1]:hWnd,FM_CHANGEFOCUS)

Un saludo.

Intenta algo así: SendMessage(oFld:aDialogs[X]:aControls[Y]:hWnd , FM_CHANGEFOCUS) } ó PostMessage(oFld:aDialogs[ X ]:aControls[ Y ]:hWnd , FM_CHANGEFOCUS) } Para darle foco al Control ' Y ' de la pestaña ' X '. El primero le da foco directamente. El segundo espera a que se procesen los mensajes de ...