FiveTech Software tech support forums

... aList ) This is how it is working here. https://imagizer.imageshack.com/img922/7010/FwiBdx.gif When FW_SetUnicode( .F. ), no keychar is higher than 255 and none of the special or other characters are displayed as "?". We request both of you to try this sample and ...

... aList ) This is how it is working here. https://imagizer.imageshack.com/img922/7010/FwiBdx.gif When FW_SetUnicode( .F. ), no keychar is higher than 255 and none of the special or other characters are displayed as "?". We request both of you to try this sample and ...

... While Fwh 23.07 version was active, I manually added TGet.prg to the make file of the program. I put a rem at the beginning of the METHOD KeyChar function in TGet.prg, and when I ran the program and pressed the Ğ character while on a get field, I got the value 208 in the nKey variable ...

... code of function XBrowse(...) in \fwh\source\function\xbrowser.prg Being a Windows application, INKEY() is not used, but the methods KeyDown() and KeyChar() are used ( handling WM_KEYDOWN messages) There is not input box and when the browse has focus, xbrowse responds to the keys pressed by the ...

... Calls =========== Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SEEK( 9409 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:KEYCHAR( 3861 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1857 ) Called from: ...

Antonio Linares wrote:Dear Hakan,

It is WM_CHAR, not WM_KEYCHAR sorry

#define WM_CHAR 0x0102

Code: Select all  Expand view

PostMessage( hWnd, WM_CHAR, VK_TAB )

unfortunately no results.

Dear Hakan,

It is WM_CHAR, not WM_KEYCHAR sorry

#define WM_CHAR 0x0102

Antonio Linares wrote:Dear Hakan,

You may try:

PostMessage( hWnd, WM_KEYCHAR, VK_TAB )

etc

Thank you Antonio,

What is WM_KEYCHAR? There is not in winapi.ch.

Dear Hakan,

You may try:

PostMessage( hWnd, WM_KEYCHAR, VK_TAB )

etc

... 2] = U Stack Calls =========== Called from: .\source\classes\TGET.PRG => TGET:KEYWCHAR( 919 ) Called from: .\source\classes\TGET.PRG => TGET:KEYCHAR( 1268 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1733 ) Called from: ...

... 4308 ) Called from: c:\fwh\source\classes\xbrowse.prg => TXBROWSE:SEEK( 6474 ) Called from: c:\fwh\source\classes\xbrowse.prg => TXBROWSE:KEYCHAR( 2495 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: c:\fwh\source\classes\control.prg => TCONTROL:HANDLEEVENT( 1733 ) Called ...

... from: CUSTVIEW.PRG => _ISEARCH( 709 ) Called from: CUSTVIEW.PRG => (b)_CUSTVIEW( 307 ) Called from: .\source\classes\TGET.PRG => TGET:KEYCHAR( 2215 ) Called from: => TWINDOW:HANDLEEVENT( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1827 ) Called from: ...

Otra idea, Si creas una clase nueva por ejemplo MyGet heredada de la clase TGet y reescribes los metodos KeyDown y KeyChar para que los ajustes a tus necesidades? Ahi puedes "capturar" las teclas presionadas y si no es "0123456789%" lo rechazas y si el caracter ...

... ) INLINE ::PostMsg( FM_CHANGE ), ::Super:LostFocus( hWndGetFocus )ENDCLASS 2b) exclude the FM_CHANGE message in METHOD KeyChar METHOD KeyChar( nKey, nFlags ) CLASS TRichEdit5   if ::lReadOnly .and. ! GetKeyState( VK_ESCAPE )      return 0   endif   ::Super:KeyChar( ...

... //** REFRESH PASSWORD ON PASTE - WITHOUT REFRESH PASSWORD IS SHOWN IF PASTED CLASS TPGet FROM TGET DATA CTRL_V AS CHARACTER METHOD KeyChar( nKey, nFlags ) METHOD HandleEvent( nMsg, nWParam, nLParam ) ENDCLASS ********************* METHOD KeyChar( nKey, nFlags ) CLASS TPGet SELF:CTRL_V ...