FiveTech Software tech support forums

... oDlgBus:End()) FUNCTION Teclado(oDlg,nKey,nVeces) LOCAL nVez DEFAULT nVeces := 1 oDlg:SETFOCUS() FOR nVez := 1 TO nVeces oDlg:POSTMSG(WM_KEYDOWN,nKey,0) NEXT RETURN (NIL) Ojalá te sirva Saludos, Armando

... otra funcion y se abre un dialogo con botones, si en este dialogo presionan un boton, hago un proceso cierro mi dialogo secundario y mando un oGet:postmsg(256,27,0) que se supone esta en el primer get de mi dialogo principal y mando una supuesta pulsacion de la tecla "ESCAPE", ok. Pues no funciona ...

Enrico, > oGet:bGotFocus := { || oGet:PostMsg( WM_KEYDOWN, VK_HOME ) } I already tried that. First it only has an effect when tabbing or shift-tabbing into the Get. What it does is select the text from position 1 to the current postion without ...

Enrico,

>oGet:bGotFocus := { || oGet:PostMsg( EM_SETSEL, Len( RTrim( cName ) ), 0 ) }

This one selects all the text from 1 to the current cursor position. Still not what I need.

James

Enrico, > oGet:bGotFocus := { || oGet:PostMsg( WM_KEYDOWN, VK_HOME ) } I already tried that. First it only has an effect when tabbing or shift-tabbing into the Get. What it does is select the text from position 1 to the current postion without ...

... has worked and the __Keyboard(VK_TAB) has performed an illegal operation! >FUNCTION FwKeyboard( oWnd, nKey ) >oWnd:SetFocus() >oWnd:PostMsg( WM_KEYDOWN, nKey, 0) >RETURN NIL Regards - Ramesh Babu P

Here is how you can simulate Clipper's keyboard() function:

FUNCTION FwKeyboard( oWnd, nKey )

oWnd:SetFocus()
oWnd:PostMsg( WM_KEYDOWN, nKey, 0)

RETURN NIL

Thank for answer but don't works. With "POSTMSG(WM_SETFOCUS)" it makes something strange, because I see the cursor in the get but the "real" focus is in some other control.

Regards
Gianni

Hi everybody

In a TGet(), how can I make the cursor step one position to the right. I have tried oGet:PostMsg( WM_KEYDOWN, VK_RIGHT, 0 ) but it does not seem to work
Any suggestion? Thanks

Rafael