Click above to get retro games delivered to your door ever month!

TranslateMessage()
Translate a keyboard message
------------------------------------------------------------------------------

Syntax
#include "msg.ch"
TranslateMessage( <hWnd>, <aMsg> )   -->   lDone

Arguments
<hWnd> specifies the window the message might be for.

<aMsg> is the array containing the message.  It must be at
least MSG_LENGTH in length, and must have been returned by
GetMessage() or PeekMessage().

Returns
A logical TRUE (.T.) is returned if the message is handled.

Description
This function allows Clip-4-Win applications to be programmed
in the "traditional" manner of Windows applications, if you
wish.  It provides special handling of certain messages, such
as TAB and Down Arrow, the way modal dialogs do.  If you have
several windows, you may well want to call this function for
each of them until .T. is returned (or you run out of windows).

Clip-4-Win calls this function internally during ChkEvent().

Example
#include "msg.ch"
local     aMsg[MSG_LENGTH]
do while GetMessage( aMsg )
     if  !IsDialogMessage( hModelessDlg, aMsg )        ;
     .and. TranslateAccelerator( hWnd, hAccel, aMsg ) == 0
          TranslateMessage( aMsg )
          DispatchMessage( aMsg )
     endif
enddo