imm.cpp

windows ce 平台下的輸入法 程序編寫 範例

/*
 * Copyright (C) 1999.4  Li ZhenChun
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License; or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that is will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of 
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, M A 02139, USA.
 *
 * Author: Li ZhenChun  email: [e-mail] or [e-mail]
 * 
 */

#include "freepy.h"

BOOL WINAPI ImeInquire(IN LPIMEINFO lpIMEInfo,IN OUT LPTSTR lpszUIClass,IN DWORD lpszOption)
{
	//DebugLog(1,(DebugLogFile,_T("ImeInquire\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeInquire begin\r\n")));

    //lpIMEInfo->dwPrivateDataSize = sizeof(UIEXTRA);
	lpIMEInfo->dwPrivateDataSize = sizeof(DWORD);
    lpIMEInfo->fdwProperty = IME_PROP_KBD_CHAR_FIRST |
#ifdef _UNICODE
                             IME_PROP_UNICODE |
#endif
							 IME_PROP_AT_CARET;
                             //IME_PROP_SPECIAL_UI;

    lpIMEInfo->fdwConversionCaps = IME_CMODE_FULLSHAPE |
								IME_CMODE_NATIVE;

    lpIMEInfo->fdwSentenceCaps = IME_SMODE_NONE;
    lpIMEInfo->fdwUICaps = UI_CAP_2700;

	lpIMEInfo->fdwSCSCaps = 0L;

    lpIMEInfo->fdwSelectCaps = SELECT_CAP_CONVERSION;

    //_tcscpy(lpszUIClass,UICLASSNAME);
	lstrcpy(lpszUIClass,(LPTSTR)UICLASSNAME);
	RETAILMSG(DEBUGMODE,(TEXT("ImeInquire end\r\n")));
    return TRUE;
}

BOOL WINAPI ImeConfigure(HKL hKL,HWND hWnd, DWORD dwMode, LPVOID lpData)
{
	//DebugLog(1,(DebugLogFile,"ImeConfigure\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeConfigure\r\n")));

	DialogBox( hInst,MAKEINTRESOURCE(DIALOGCONFIG),hWnd,ConfigDialogProc);
	InvalidateRect(hWnd,NULL,FALSE);
	return TRUE;
}

DWORD WINAPI ImeConversionList(HIMC hIMC,LPCTSTR lpSource,LPCANDIDATELIST lpCandList,DWORD dwBufLen,UINT uFlag)
{
	//DebugLog(1,(DebugLogFile,"ImeConversionList\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeConversionList\r\n")));

    return 0;
}

BOOL WINAPI ImeDestroy(UINT uForce)
{
	//DebugLog(1,(DebugLogFile,"ImeDestroy\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeDestroy\r\n")));
    return FALSE;
}

LRESULT WINAPI ImeEscape(HIMC hIMC,UINT uSubFunc,LPVOID lpData)
{
	//DebugLog(1,(DebugLogFile,"ImeEscape\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeEscape\r\n")));
	return FALSE;
}

BOOL WINAPI ImeProcessKey(HIMC hIMC,UINT vKey,LPARAM lKeyData,CONST LPBYTE lpbKeyState)
{
    BOOL fRet = FALSE;
    BOOL fOpen;
    BOOL fCompStr = FALSE;
    LPINPUTCONTEXT lpIMC;
    LPCOMPOSITIONSTRING lpCompStr;
	static BOOL fPressOther = FALSE;
//	static BOOL fFirst = TRUE;

	//DebugLog(1,(DebugLogFile,"ImeProcessKey\r\n")));
	RETAILMSG(DEBUGMODE,(TEXT("ImeProcessKey\r\n")));

    if ((lKeyData & 0x80000000) && vKey != VK_CONTROL)
        return FALSE;

	if (!(lKeyData & 0x80000000) && vKey == VK_CONTROL)
		return FALSE;

	if (lpbKeyState[VK_MENU] & 0x80 ) return FALSE;

	if(vKey != VK_CONTROL && lpbKeyState[VK_CONTROL] & 0x80 ) {
		fPressOther = TRUE;
		return FALSE;
	}

    if (!(lpIMC = ImmLockIMC(hIMC)))
        return FALSE;

    fOpen = lpIMC->fOpen;

	if(vKey == VK_CONTROL && (lKeyData & 0x80000000) && !fPressOther){ // && !fFirst){
		GENEMSG GnMsg;

		fPressOther = FALSE;

		if(fOpen) {
			lpIMC->fOpen=FALSE;
			MakeResultString(hIMC,FALSE);
		}
		else lpIMC->fOpen=TRUE;

		GnMsg.msg = WM_IME_NOTIFY;
		GnMsg.wParam = IMN_SETOPENSTATUS;
		GnMsg.lParam = 0;
		GenerateMessage(hIMC, lpdwCurTransKey,(LPGENEMSG)&GnMsg);
		return FALSE;
	}

	fPressOther = FALSE;

//	if(fFirst) fFirst = FALSE;

/*
	//if CapsLock is pressed ,then return false;
	if (lpbKeyState[VK_CAPITAL] & 0x01) {
		return FALSE;
	}

    if (fOpen)
    {
        if (lpCompStr = (LPCOMPOSITIONSTRING)ImmLockIMCC(lpIMC->hCompStr))
        {
            if ((lpCompStr->dwSize > sizeof(COMPOSITIONSTRING)) && 
                (lpCompStr->dwCompStrLen))
                fCompStr = TRUE;
			ImmUnlockIMCC(lpIMC->hCompStr);
        }

		if (dwConversionMode & CONVERSION_MODE_FULLSHAPE){
			if (lpbKeyState[VK_SHIFT] & 0x80)
		    {
			    if (fCompStr)
				    fRet = (BOOL)bFullCompSht[vKey];
				else
					fRet = (BOOL)bFullNoCompSht[vKey];
			}
			else 
			{
				if (fCompStr)
					fRet = (BOOL)bFullComp[vKey];
				else
					fRet = (BOOL)bFullNoComp[vKey];
			}
		}
		else{
			if (lpbKeyState[VK_SHIFT] & 0x80)
		    {
			    if (fCompStr)
				    fRet = (BOOL)bCompSht[vKey];
				else
					fRet = (BOOL)bNoCompSht[vKey];
			}
			else 
			{
				if (fCompStr)
					fRet = (BOOL)bComp[vKey];
				else
					fRet = (BOOL)bNoComp[vKey];
			}
		}
    }
*/

    if (fOpen)
    {
        if (lpCompStr = (LPCOMPOSITIONSTRING)ImmLockIMCC(lpIMC->hCompStr))
        {
            if ((lpCompStr->dwSize > sizeof(COMPOSITIONSTRING)) && 
                (lpCompStr->dwCompStrLen))
                fCompStr = TRUE;
			ImmUnlockIMCC(lpIMC->hCompStr);
        }
		if (fCompStr)
			fRet = (BOOL)bComp[vKey];
		else
			fRet = (BOOL)bNoComp[vKey];
	}

    ImmUnlockIMC(hIMC);
    return fRet;
}


BOOL WINAPI ImeSelect(HIMC hIMC, BOOL fSelect)
{
    LPINPUTCONTEXT lpIMC;

	//DebugLog(1,(DebugLogFile,"ImeSelect\r\n")));
    RETAILMSG(DEBUGMODE,(TEXT("ImeSelect\r\n")));

    if (fSelect)
        UpdateIndicIcon(hIMC);

    // it's NULL context.
    if (!hIMC)
        return TRUE;

    if (lpIMC = ImmLockIMC(hIMC))
    {
        if (fSelect)
        {
            LPCOMPOSITIONSTRING lpCompStr;
            LPCANDIDATEINFO lpCandInfo;
			HKEY hKey;
			DWORD dwConvSet;
			DWORD dwData = sizeof(DWORD);
			BOOL fFlag = TRUE;

            // Init the general member of IMC.
			lpIMC->fOpen=TRUE;
			
            lpIMC->hCompStr = ImmReSizeIMCC(lpIMC->hCompStr,sizeof(MYCOMPSTR));
            if (lpCompStr = (LPCOMPOSITIONSTRING)ImmLockIMCC(lpIMC->hCompStr)) 
            {
				InitCompStr(lpCompStr);
                ImmUnlockIMCC(lpIMC->hCompStr);
            }
            lpIMC->hCandInfo = ImmReSizeIMCC(lpIMC->hCandInfo,sizeof(MYCAND));
            if (lpCandInfo = (LPCANDIDATEINFO)ImmLockIMCC(lpIMC->hCandInfo)) 
            {
				InitCandInfo(lpCandInfo);
                ImmUnlockIMCC(lpIMC->hCandInfo);
            }

			if ( RegOpenKeyEx(HKEY_LOCAL_MACHINE,
				_T("Software\\freepy"),
				0,
				KEY_READ,
				&hKey) == ERROR_SUCCESS ){
				if( RegQueryValueEx( hKey,
								_T("ConversionSet"),
								NULL,
								NULL,
								(LPBYTE)&dwConvSet,
								&dwData) == ERROR_SUCCESS ){
					wConversionSet = (WORD) dwConvSet;
					fFlag = FALSE;
				}
				RegCloseKey(hKey);
			}
			if( fFlag) {
				wConversionSet = CONVERSION_SET_PUNCT;
				wConversionSet |= CONVERSION_SET_SORT;
				wConversionSet |= CONVERSION_SET_FOLLOW;
				wConversionSet |= CONVERSION_SET_GBK;
			}

        }
    }

    ImmUnlockIMC(hIMC);
	
    return TRUE;
}

BOOL WINAPI ImeSetActiveContext(HIMC hIMC,BOOL fFlag)
{