开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 输入法编程 > 查看源码
ImmDev.pas
资源名称：Wingb_Mz.rar　[点击查看]
上传用户：wen198501
上传日期：2013-04-01
资源大小：335k
文件大小：37k
源码类别：

输入法编程

开发平台：

Delphi

ImmDev.pas：源码内容
  2.  {******************************************************}
  3.  {                                                      }
  4.  {    Copyright (c) 1993-1998 Microsoft Corporation     }
  5.  {                                                      }
  6.  {    Module Name:  Immdev.h ->>  ImmDev.pas            }
  7.  {                                                      }
  8.  {    Translator:  Liu_mazi@126.com, 2005-11-12         }
  9.  {                                                      }
  10.  {******************************************************}
  12. unit ImmDev;
  14. {$I Define.Inc}
  16. interface
  18. uses Windows;
  20. type
  21.   HImc  = DWord;
  22.   HImcc = DWord;
  23.   PHKL  = ^HKL;
  25. type
  26.   PCompositionForm = ^TCompositionForm;
  27.   TCompositionForm = record
  28.     dwStyle: DWord;
  29.     ptCurrentPos: TPoint;
  30.     rcArea: TRect;
  31.   end;
  33. type
  34.   PCandidateForm = ^TCandidateForm;
  35.   TCandidateForm = record
  36.     dwIndex: DWord;
  37.     dwStyle: DWord;
  38.     ptCurrentPos: TPoint;
  39.     rcArea: TRect;
  40.   end;
  42. type
  43.   PCandidateList = ^TCandidateList;
  44.   TCandidateList = record
  45.     dwSize: DWord;
  46.     dwStyle: DWord;
  47.     dwCount: DWord;
  48.     dwSelection: DWord;
  49.     dwPageStart: DWord;
  50.     dwPageSize: DWord;
  51.     dwOffset: array[0..0] of DWord;
  52.   end;
  54. type
  55.   PRegisterWordA = ^TRegisterWordA;
  56.   TRegisterWordA = record
  57.     lpReading: PAnsiChar;
  58.     lpWord: PAnsiChar;
  59.   end;
  61.   PRegisterWordW = ^TRegisterWordW;
  62.   TRegisterWordW = record
  63.     lpReading: PWideChar;
  64.     lpWord: PWideChar;
  65.   end;
  67.   TRegisterWord = TRegisterWordA;
  68.   PRegisterWord = PRegisterWordA;
  70. type
  71.   PReconvertString = ^TReconvertString;
  72.   TReconvertString = record
  73.     dwSize: DWord;
  74.     dwVersion: DWord;
  75.     dwStrLen: DWord;
  76.     dwStrOffset: DWord;
  77.     dwCompStrLen: DWord;
  78.     dwCompStrOffset: DWord;
  79.     dwTargetStrLen: DWord;
  80.     dwTargetStrOffset: DWord;
  81.   end;
  83. const
  84.   STYLE_DESCRIPTION_SIZE = 32;
  86. type
  87.   PStyleBufA = ^TStyleBufA;
  88.   TStyleBufA = record
  89.     dwStyle: DWord;
  90.     szDescription: array[0..STYLE_DESCRIPTION_SIZE-1] of AnsiChar;
  91.   end;
  93.   PStyleBufW = ^TStyleBufW;
  94.   TStyleBufW = record
  95.     dwStyle: DWord;
  96.     szDescription: array[0..STYLE_DESCRIPTION_SIZE-1] of WideChar;
  97.   end;
  99.   TStyleBuf = TStyleBufA;
  100.   PStyleBuf = PStyleBufA;
  102. const
  103.   IMEMENUITEM_STRING_SIZE = 80;
  105. type
  106.   PImeMenuItemInfoA = ^TImeMenuItemInfoA;
  107.   TImeMenuItemInfoA = record
  108.     cbSize: UInt;
  109.     fType: UInt;
  110.     fState: UInt;
  111.     wID: UInt;
  112.     hbmpChecked: HBitmap;
  113.     hbmpUnchecked: HBitmap;
  114.     dwItemData: DWord;
  115.     szString: array[0..IMEMENUITEM_STRING_SIZE-1] of AnsiChar;
  116.     hbmpItem: HBitmap;
  117.   end;
  119.   PImeMenuItemInfoW = ^TImeMenuItemInfoW;
  120.   TImeMenuItemInfoW = record
  121.     cbSize: UInt;
  122.     fType: UInt;
  123.     fState: UInt;
  124.     wID: UInt;
  125.     hbmpChecked: HBitmap;
  126.     hbmpUnchecked: HBitmap;
  127.     dwItemData: DWord;
  128.     szString: array[0..IMEMENUITEM_STRING_SIZE-1] of WideChar;
  129.     hbmpItem: HBitmap;
  130.   end;
  132.   TImeMenuItemInfo = TImeMenuItemInfoA;
  133.   PImeMenuItemInfo = PImeMenuItemInfoA;
  135. type
  136.   PImeCharPosition = ^TImeCharPosition;
  137.   TImeCharPosition = record
  138.     dwSize: DWord;
  139.     dwCharPos: DWord;
  140.     pt: TPoint;
  141.     cLineHeight: UInt;
  142.     rcDocument: TRect;
  143.   end;
  145. type
  146.   ImcEnumProc = function(hImc: HImc; lParam: LParam): Bool; stdcall;
  148.   
  149.   // prototype of IMM API ..
  151. function ImmInstallIME(lpszIMEFileName, lpszLayoutText: PChar): HKL; stdcall;
  152. function ImmInstallIMEA(lpszIMEFileName, lpszLayoutText: PAnsiChar): HKL; stdcall;
  153. function ImmInstallIMEW(lpszIMEFileName, lpszLayoutText: PWideChar): HKL; stdcall;
  155. function ImmGetDefaultIMEWnd(hWnd: HWnd): HWnd; stdcall;
  157. function ImmGetDescription(hKl: HKL; lpszDescription: PChar; uBufLen: UInt): UInt; stdcall;
  158. function ImmGetDescriptionA(hKl: HKL; lpszDescription: PAnsiChar; uBufLen: UInt): UInt; stdcall;
  159. function ImmGetDescriptionW(hKl: HKL; lpszDescription: PWideChar; uBufLen: UInt): UInt; stdcall;
  161. function ImmGetIMEFileName(hKl: HKL; lpszFileName: PChar; uBufLen: UInt): UInt; stdcall;
  162. function ImmGetIMEFileNameA(hKl: HKL; lpszFileName: PAnsiChar; uBufLen: UInt): UInt; stdcall;
  163. function ImmGetIMEFileNameW(hKl: HKL; lpszFileName: PWideChar; uBufLen: UInt): UInt; stdcall;
  165. function ImmGetProperty(hKl: HKL; fdwIndex: DWord): DWord; stdcall;
  167. function ImmIsIME(hKl: HKL): Bool; stdcall;
  169. function ImmSimulateHotKey(hWnd: HWnd; dwHotKeyID: DWord): Bool; stdcall;
  171. function ImmCreateContext(): HImc; stdcall;
  172. function ImmDestroyContext(hImc: HImc): Bool; stdcall;
  173. function ImmGetContext(hWnd: HWnd): HImc; stdcall;
  174. function ImmReleaseContext(hWnd: HWnd; hImc: HImc): Bool; stdcall;
  175. function ImmAssociateContext(hWnd: HWnd; hImc: HImc): HImc; stdcall;
  176. function ImmAssociateContextEx(hWnd: HWnd; hIMC: HImc; dwFlags: DWord): Bool; stdcall;
  178. function ImmGetCompositionString(hImc: HImc; dwIndex: DWord; lpBuf: Pointer; dwBufLen: DWord): LongInt; stdcall;
  179. function ImmGetCompositionStringA(hImc: HImc; dwIndex: DWord; lpBuf: Pointer; dwBufLen: DWord): LongInt; stdcall;
  180. function ImmGetCompositionStringW(hImc: HImc; dwIndex: DWord; lpBuf: Pointer; dwBufLen: DWord): LongInt; stdcall;
  182. function ImmSetCompositionString(hImc: HImc; dwIndex: DWord; lpComp: Pointer; dwCompLen: DWord; lpRead: Pointer; dwReadLen: DWord): Bool; stdcall;
  183. function ImmSetCompositionStringA(hImc: HImc; dwIndex: DWord; lpComp: Pointer; dwCompLen: DWord; lpRead: Pointer; dwReadLen: DWord): Bool; stdcall;
  184. function ImmSetCompositionStringW(hImc: HImc; dwIndex: DWord; lpComp: Pointer; dwCompLen: DWord; lpRead: Pointer; dwReadLen: DWord): Bool; stdcall;
  186. function ImmGetCandidateListCount(hImc: HImc; lpdwListCount: PDWord): DWord; stdcall;
  187. function ImmGetCandidateListCountA(hImc: HImc; lpdwListCount: PDWord): DWord; stdcall;
  188. function ImmGetCandidateListCountW(hImc: HImc; lpdwListCount: PDWord): DWord; stdcall;
  190. function ImmGetCandidateList(hImc: HImc; deIndex: DWord; lpCandidateList: PCandidateList; dwBufLen: DWord): DWord; stdcall;
  191. function ImmGetCandidateListA(hImc: HImc; deIndex: DWord; lpCandidateList: PCandidateList; dwBufLen: DWord): DWord; stdcall;
  192. function ImmGetCandidateListW(hImc: HImc; deIndex: DWord; lpCandidateList: PCandidateList; dwBufLen: DWord): DWord; stdcall;
  194. function ImmGetGuideLine(hImc: HImc; dwIndex: DWord; lpBuf: PChar; dwBufLen: DWord): DWord; stdcall;
  195. function ImmGetGuideLineA(hImc: HImc; dwIndex: DWord; lpBuf: PAnsiChar; dwBufLen: DWord): DWord; stdcall;
  196. function ImmGetGuideLineW(hImc: HImc; dwIndex: DWord; lpBuf: PWideChar; dwBufLen: DWord): DWord; stdcall;
  198. function ImmGetConversionStatus(hImc: HImc; lpfdwConversion, lpfdwSentence: PDWord): Bool; stdcall;
  199. function ImmSetConversionStatus(hImc: HImc; fdwConversion, fdwSentence: DWord): Bool; stdcall;
  200. function ImmGetOpenStatus(hImc: HImc): Bool; stdcall;
  201. function ImmSetOpenStatus(hImc: HImc; fOpen: Bool): Bool; stdcall;
  203. function ImmGetCompositionFont(hImc: HImc; lpLogfont: PLogFont): Bool; stdcall;
  204. function ImmGetCompositionFontA(hImc: HImc; lpLogfont: PLogFontA): Bool; stdcall;
  205. function ImmGetCompositionFontW(hImc: HImc; lpLogfont: PLogFontW): Bool; stdcall;
  207. function ImmSetCompositionFont(hImc: HImc; lpLogfont: PLogFont): Bool; stdcall;
  208. function ImmSetCompositionFontA(hImc: HImc; lpLogfont: PLogFontA): Bool; stdcall;
  209. function ImmSetCompositionFontW(hImc: HImc; lpLogfont: PLogFontW): Bool; stdcall;
  211. function ImmConfigureIME(hKl: HKL; hWnd: HWnd; dwMode: DWord; lpData: Pointer): Bool; stdcall;
  212. function ImmConfigureIMEA(hKl: HKL; hWnd: HWnd; dwMode: DWord; lpData: Pointer): Bool; stdcall;
  213. function ImmConfigureIMEW(hKl: HKL; hWnd: HWnd; dwMode: DWord; lpData: Pointer): Bool; stdcall;
  215. function ImmEscape(hKl: HKL; hImc: HImc; uEscape: UInt; lpData: Pointer): LResult; stdcall;
  216. function ImmEscapeA(hKl: HKL; hImc: HImc; uEscape: UInt; lpData: Pointer): LResult; stdcall;
  217. function ImmEscapeW(hKl: HKL; hImc: HImc; uEscape: UInt; lpData: Pointer): LResult; stdcall;
  219. function ImmGetConversionList(hKl: HKL; hImc: HImc; lpSrc: PChar; lpDst: PCandidateList; dwBufLen: DWord; uFlag: UInt): DWord; stdcall;
  220. function ImmGetConversionListA(hKl: HKL; hImc: HImc; lpSrc: PAnsiChar; lpDst: PCandidateList; dwBufLen: DWord; uFlag: UInt): DWord; stdcall;
  221. function ImmGetConversionListW(hKl: HKL; hImc: HImc; lpSrc: PWideChar; lpDst: PCandidateList; dwBufLen: DWord; uFlag: UInt): DWord; stdcall;
  223. function ImmNotifyIME(hImc: HImc; dwAction, dwIndex, dwValue: DWord): Bool; stdcall;
  225. function ImmGetStatusWindowPos(hImc: HImc; lpptPos: PPoint): Bool; stdcall;
  226. function ImmSetStatusWindowPos(hImc: HImc; lpptPos: PPoint): Bool; stdcall;
  227. function ImmGetCompositionWindow(hImc: HImc; lpCompForm: PCompositionForm): Bool; stdcall;
  228. function ImmSetCompositionWindow(hImc: HImc; lpCompForm: PCompositionForm): Bool; stdcall;
  229. function ImmGetCandidateWindow(hImc: HImc; dwBufLen: DWord; lpCandidate: PCandidateForm): Bool; stdcall;
  230. function ImmSetCandidateWindow(hImc: HImc; lpCandidate: PCandidateForm): Bool; stdcall;
  232. function ImmIsUIMessage(hWnd: HWnd; uMsg: UInt; wParam: WParam; lParam: LParam): Bool; stdcall;
  233. function ImmIsUIMessageA(hWnd: HWnd; uMsg: UInt; wParam: WParam; lParam: LParam): Bool; stdcall;
  234. function ImmIsUIMessageW(hWnd: HWnd; uMsg: UInt; wParam: WParam; lParam: LParam): Bool; stdcall;
  236. function ImmGetVirtualKey(hWnd: HWnd): UInt; stdcall;
  238. type
  239.   RegisterWordEnumProcA = function(lpszReading: PAnsiChar; dwStyle: DWord; lpszString: PAnsiChar; lpData: Pointer): UInt; stdcall;
  240.   RegisterWordEnumProcW = function(lpszReading: PWideChar; dwStyle: DWord; lpszString: PWideChar; lpData: Pointer): UInt; stdcall;
  241.   RegisterWordEnumProc  = RegisterWordEnumProcA;
  243. function ImmRegisterWord(hKl: HKL; lpszReading: PChar; dwStyle: DWord; lpszRegister: PChar): Bool; stdcall;
  244. function ImmRegisterWordA(hKl: HKL; lpszReading: PAnsiChar; dwStyle: DWord; lpszRegister: PAnsiChar): Bool; stdcall;
  245. function ImmRegisterWordW(hKl: HKL; lpszReading: PWideChar; dwStyle: DWord; lpszRegister: PWideChar): Bool; stdcall;
  247. function ImmUnregisterWord(hKl: HKL; lpszReading: PChar; dwStyle: DWord; lpszUnregister: PChar): Bool; stdcall;
  248. function ImmUnregisterWordA(hKl: HKL; lpszReading: PAnsiChar; dwStyle: DWord; lpszUnregister: PAnsiChar): Bool; stdcall;
  249. function ImmUnregisterWordW(hKl: HKL; lpszReading: PWideChar; dwStyle: DWord; lpszUnregister: PWideChar): Bool; stdcall;
  251. function ImmGetRegisterWordStyle(hKl: HKL; nItem: UInt; lpStyleBuf: PStyleBuf): UInt; stdcall;
  252. function ImmGetRegisterWordStyleA(hKl: HKL; nItem: UInt; lpStyleBuf: PStyleBufA): UInt; stdcall;
  253. function ImmGetRegisterWordStyleW(hKl: HKL; nItem: UInt; lpStyleBuf: PStyleBufW): UInt; stdcall;
  255. function ImmEnumRegisterWord(hKl: HKL; lpfnEnumProc: RegisterWordEnumProc; lpszReading: PChar; dwStyle: DWord; lpszRegister: PChar; lpData: Pointer): UInt; stdcall;
  256. function ImmEnumRegisterWordA(hKl: HKL; lpfnEnumProc: RegisterWordEnumProcA; lpszReading: PAnsiChar; dwStyle: DWord; lpszRegister: PAnsiChar; lpData: Pointer): UInt; stdcall;
  257. function ImmEnumRegisterWordW(hKl: HKL; lpfnEnumProc: RegisterWordEnumProcW; lpszReading: PWideChar; dwStyle: DWord; lpszRegister: PWideChar; lpData: Pointer): UInt; stdcall;
  259. function ImmDisableIME(idThread: DWord): Bool; stdcall;
  261. function ImmEnumInputContext(idThread: DWord; lpfn: ImcEnumProc; lParam: LParam): Bool; stdcall;
  263. function ImmGetImeMenuItems(hImc: HImc; dwFlags, dwType: DWord; lpImeParentMenu, lpImeMenu: PImeMenuItemInfo; dwSize: DWord): DWord; stdcall;
  264. function ImmGetImeMenuItemsA(hImc: HImc; dwFlags, dwType: DWord; lpImeParentMenu, lpImeMenu: PImeMenuItemInfoA; dwSize: DWord): DWord; stdcall;
  265. function ImmGetImeMenuItemsW(hImc: HImc; dwFlags, dwType: DWord; lpImeParentMenu, lpImeMenu: PImeMenuItemInfoW; dwSize: DWord): DWord; stdcall;
  268.   // wParam for WM_IME_CONTROL
  269. const
  270.   IMC_GETCANDIDATEPOS           =  $0007;
  271.   IMC_SETCANDIDATEPOS           =  $0008;
  272.   IMC_GETCOMPOSITIONFONT        =  $0009;
  273.   IMC_SETCOMPOSITIONFONT        =  $000A;
  274.   IMC_GETCOMPOSITIONWINDOW      =  $000B;
  275.   IMC_SETCOMPOSITIONWINDOW      =  $000C;
  276.   IMC_GETSTATUSWINDOWPOS        =  $000F;
  277.   IMC_SETSTATUSWINDOWPOS        =  $0010;
  278.   IMC_CLOSESTATUSWINDOW         =  $0021;
  279.   IMC_OPENSTATUSWINDOW          =  $0022;
  281.   // dwAction for ImmNotifyIME
  282. const
  283.   NI_OPENCANDIDATE              =  $0010;
  284.   NI_CLOSECANDIDATE             =  $0011;
  285.   NI_SELECTCANDIDATESTR         =  $0012;
  286.   NI_CHANGECANDIDATELIST        =  $0013;
  287.   NI_FINALIZECONVERSIONRESULT   =  $0014;
  288.   NI_COMPOSITIONSTR             =  $0015;
  289.   NI_SETCANDIDATE_PAGESTART     =  $0016;
  290.   NI_SETCANDIDATE_PAGESIZE      =  $0017;
  291.   NI_IMEMENUSELECTED            =  $0018;
  293.   // lParam for WM_IME_SETCONTEXT
  294. const
  295.   ISC_SHOWUICANDIDATEWINDOW     =  $00000001;
  296.   ISC_SHOWUICOMPOSITIONWINDOW   =  $80000000;
  297.   ISC_SHOWUIGUIDELINE           =  $40000000;
  298.   ISC_SHOWUIALLCANDIDATEWINDOW  =  $0000000F;
  299.   ISC_SHOWUIALL                 =  $C000000F;
  301.   // dwIndex for ImmNotifyIME/NI_COMPOSITIONSTR
  302. const
  303.   CPS_COMPLETE                  =  $0001;
  304.   CPS_CONVERT                   =  $0002;
  305.   CPS_REVERT                    =  $0003;
  306.   CPS_CANCEL                    =  $0004;
  308.   // the modifiers of hot key
  309. const
  310.   MOD_ALT                       =  $0001;
  311.   MOD_CONTROL                   =  $0002;
  312.   MOD_SHIFT                     =  $0004;
  314.   MOD_LEFT                      =  $8000;
  315.   MOD_RIGHT                     =  $4000;
  317.   MOD_ON_KEYUP                  =  $0800;
  318.   MOD_IGNORE_ALL_MODIFIER       =  $0400;
  320.   // Windows for Simplified Chinese Edition hot key ID from 0x10 - 0x2F
  321. const
  322.   IME_CHOTKEY_IME_NONIME_TOGGLE         =  $10;
  323.   IME_CHOTKEY_SHAPE_TOGGLE              =  $11;
  324.   IME_CHOTKEY_SYMBOL_TOGGLE             =  $12;
  326.   // Windows for Japanese Edition hot key ID from 0x30 - 0x4F
  327. const
  328.   IME_JHOTKEY_CLOSE_OPEN                =  $30;
  330.   // Windows for Korean Edition hot key ID from 0x50 - 0x6F
  331. const
  332.   IME_KHOTKEY_SHAPE_TOGGLE              =  $50;
  333.   IME_KHOTKEY_HANJACONVERT              =  $51;
  334.   IME_KHOTKEY_ENGLISH                   =  $52;
  336.   // Windows for Traditional Chinese Edition hot key ID from 0x70 - 0x8F
  337. const
  338.   IME_THOTKEY_IME_NONIME_TOGGLE         =  $70;
  339.   IME_THOTKEY_SHAPE_TOGGLE              =  $71;
  340.   IME_THOTKEY_SYMBOL_TOGGLE             =  $72;
  342.   // direct switch hot key ID from 0x100 - 0x11F
  343. const
  344.   IME_HOTKEY_DSWITCH_FIRST              =  $100;
  345.   IME_HOTKEY_DSWITCH_LAST               =  $11F;
  347.   // IME private hot key from 0x200 - 0x21F
  348. const
  349.   IME_HOTKEY_PRIVATE_FIRST              =  $200;
  350.   IME_ITHOTKEY_RESEND_RESULTSTR         =  $200;
  351.   IME_ITHOTKEY_PREVIOUS_COMPOSITION     =  $201;
  352.   IME_ITHOTKEY_UISTYLE_TOGGLE           =  $202;
  353.   IME_ITHOTKEY_RECONVERTSTRING          =  $203;
  354.   IME_HOTKEY_PRIVATE_LAST               =  $21F;
  356.   // parameter of ImmGetCompositionString
  357. const
  358.   GCS_COMPREADSTR               =  $0001;
  359.   GCS_COMPREADATTR              =  $0002;
  360.   GCS_COMPREADCLAUSE            =  $0004;
  361.   GCS_COMPSTR                   =  $0008;
  362.   GCS_COMPATTR                  =  $0010;
  363.   GCS_COMPCLAUSE                =  $0020;
  364.   GCS_CURSORPOS                 =  $0080;
  365.   GCS_DELTASTART                =  $0100;
  366.   GCS_RESULTREADSTR             =  $0200;
  367.   GCS_RESULTREADCLAUSE          =  $0400;
  368.   GCS_RESULTSTR                 =  $0800;
  369.   GCS_RESULTCLAUSE              =  $1000;
  371.   // style bit flags for WM_IME_COMPOSITION
  372. const
  373.   CS_INSERTCHAR                 =  $2000;
  374.   CS_NOMOVECARET                =  $4000;
  376.   // IME version constants
  377. const
  378.   IMEVER_0310                   =  $0003000A;
  379.   IMEVER_0400                   =  $00040000;
  381.   // IME property bits
  382. const
  383.   IME_PROP_AT_CARET             =  $00010000;
  384.   IME_PROP_SPECIAL_UI           =  $00020000;
  385.   IME_PROP_CANDLIST_START_FROM_1=  $00040000;
  386.   IME_PROP_UNICODE              =  $00080000;
  387.   IME_PROP_COMPLETE_ON_UNSELECT =  $00100000;
  389.   // IME UICapability bits
  390. const
  391.   UI_CAP_2700                   =  $00000001;
  392.   UI_CAP_ROT90                  =  $00000002;
  393.   UI_CAP_ROTANY                 =  $00000004;
  395.   // ImmSetCompositionString Capability bits
  396. const
  397.   SCS_CAP_COMPSTR               =  $00000001;
  398.   SCS_CAP_MAKEREAD              =  $00000002;
  399.   SCS_CAP_SETRECONVERTSTRING    =  $00000004;
  401.   // IME WM_IME_SELECT inheritance Capability bits
  402. const
  403.   SELECT_CAP_CONVERSION         =  $00000001;
  404.   SELECT_CAP_SENTENCE           =  $00000002;
  406.   // ID for deIndex of ImmGetGuideLine
  407. const
  408.   GGL_LEVEL                     =  $00000001;
  409.   GGL_INDEX                     =  $00000002;
  410.   GGL_STRING                    =  $00000003;
  411.   GGL_PRIVATE                   =  $00000004;
  413.   // ID for dwLevel of GUIDELINE Structure
  414. const
  415.   GL_LEVEL_NOGUIDELINE          =  $00000000;
  416.   GL_LEVEL_FATAL                =  $00000001;
  417.   GL_LEVEL_ERROR                =  $00000002;
  418.   GL_LEVEL_WARNING              =  $00000003;
  419.   GL_LEVEL_INFORMATION          =  $00000004;
  421.   // ID for dwIndex of GUIDELINE Structure
  422. const
  423.   GL_ID_UNKNOWN                 =  $00000000;
  424.   GL_ID_NOMODULE                =  $00000001;
  425.   GL_ID_NODICTIONARY            =  $00000010;
  426.   GL_ID_CANNOTSAVE              =  $00000011;
  427.   GL_ID_NOCONVERT               =  $00000020;
  428.   GL_ID_TYPINGERROR             =  $00000021;
  429.   GL_ID_TOOMANYSTROKE           =  $00000022;
  430.   GL_ID_READINGCONFLICT         =  $00000023;
  431.   GL_ID_INPUTREADING            =  $00000024;
  432.   GL_ID_INPUTRADICAL            =  $00000025;
  433.   GL_ID_INPUTCODE               =  $00000026;
  434.   GL_ID_INPUTSYMBOL             =  $00000027;
  435.   GL_ID_CHOOSECANDIDATE         =  $00000028;
  436.   GL_ID_REVERSECONVERSION       =  $00000029;
  437.   GL_ID_PRIVATE_FIRST           =  $00008000;
  438.   GL_ID_PRIVATE_LAST            =  $0000FFFF;
  440.   // ID for dwIndex of ImmGetProperty
  441. const
  442.   IGP_GETIMEVERSION             =  DWORD(-4);
  443.   IGP_PROPERTY                  =  $00000004;
  444.   IGP_CONVERSION                =  $00000008;
  445.   IGP_SENTENCE                  =  $0000000c;
  446.   IGP_UI                        =  $00000010;
  447.   IGP_SETCOMPSTR                =  $00000014;
  448.   IGP_SELECT                    =  $00000018;
  450.   // dwIndex for ImmSetCompositionString API
  451. const
  452.   SCS_SETSTR                    =  GCS_COMPREADSTR or GCS_COMPSTR;
  453.   SCS_CHANGEATTR                =  GCS_COMPREADATTR or GCS_COMPATTR;
  454.   SCS_CHANGECLAUSE              =  GCS_COMPREADCLAUSE or GCS_COMPCLAUSE;
  455.   SCS_SETRECONVERTSTRING        =  $00010000;
  456.   SCS_QUERYRECONVERTSTRING      =  $00020000;
  458.   // attribute for COMPOSITIONSTRING Structure
  459. const
  460.   ATTR_INPUT                    =  $00;
  461.   ATTR_TARGET_CONVERTED         =  $01;
  462.   ATTR_CONVERTED                =  $02;
  463.   ATTR_TARGET_NOTCONVERTED      =  $03;
  464.   ATTR_INPUT_ERROR              =  $04;
  465.   ATTR_FIXEDCONVERTED           =  $05;
  467.   // bit field for IMC_SETCOMPOSITIONWINDOW, IMC_SETCANDIDATEWINDOW
  468. const
  469.   CFS_DEFAULT                   =  $0000;
  470.   CFS_RECT                      =  $0001;
  471.   CFS_POINT                     =  $0002;
  472.   CFS_FORCE_POSITION            =  $0020;
  473.   CFS_CANDIDATEPOS              =  $0040;
  474.   CFS_EXCLUDE                   =  $0080;
  476.   // conversion direction for ImmGetConversionList
  477. const
  478.   GCL_CONVERSION                =  $0001;
  479.   GCL_REVERSECONVERSION         =  $0002;
  480.   GCL_REVERSE_LENGTH            =  $0003;
  482.   // bit field for conversion mode
  483. const
  484.   IME_CMODE_ALPHANUMERIC        =  $0000;
  485.   IME_CMODE_NATIVE              =  $0001;
  486.   IME_CMODE_CHINESE             =  IME_CMODE_NATIVE;
  487.   IME_CMODE_HANGEUL             =  IME_CMODE_NATIVE;
  488.   IME_CMODE_HANGUL              =  IME_CMODE_NATIVE;
  489.   IME_CMODE_JAPANESE            =  IME_CMODE_NATIVE;
  490.   IME_CMODE_KATAKANA            =  $0002;  // only effect under IME_CMODE_NATIVE
  491.   IME_CMODE_LANGUAGE            =  $0003;
  492.   IME_CMODE_FULLSHAPE           =  $0008;
  493.   IME_CMODE_ROMAN               =  $0010;
  494.   IME_CMODE_CHARCODE            =  $0020;
  495.   IME_CMODE_HANJACONVERT        =  $0040;
  496.   IME_CMODE_SOFTKBD             =  $0080;
  497.   IME_CMODE_NOCONVERSION        =  $0100;
  498.   IME_CMODE_EUDC                =  $0200;
  499.   IME_CMODE_SYMBOL              =  $0400;
  500.   IME_CMODE_FIXED               =  $0800;
  502.   // bit field for sentence mode
  503. const
  504.   IME_SMODE_NONE                =  $0000;
  505.   IME_SMODE_PLAURALCLAUSE       =  $0001;
  506.   IME_SMODE_SINGLECONVERT       =  $0002;
  507.   IME_SMODE_AUTOMATIC           =  $0004;
  508.   IME_SMODE_PHRASEPREDICT       =  $0008;
  509.   IME_SMODE_CONVERSATION        =  $0010;
  511.   // style of candidate
  512. const
  513.   IME_CAND_UNKNOWN              =  $0000;
  514.   IME_CAND_READ                 =  $0001;
  515.   IME_CAND_CODE                 =  $0002;
  516.   IME_CAND_MEANING              =  $0003;
  517.   IME_CAND_RADICAL              =  $0004;
  518.   IME_CAND_STROKE               =  $0005;
  520.   // wParam of report message WM_IME_NOTIFY
  521. const
  522.   IMN_CLOSESTATUSWINDOW         =  $0001;
  523.   IMN_OPENSTATUSWINDOW          =  $0002;
  524.   IMN_CHANGECANDIDATE           =  $0003;
  525.   IMN_CLOSECANDIDATE            =  $0004;
  526.   IMN_OPENCANDIDATE             =  $0005;
  527.   IMN_SETCONVERSIONMODE         =  $0006;
  528.   IMN_SETSENTENCEMODE           =  $0007;
  529.   IMN_SETOPENSTATUS             =  $0008;
  530.   IMN_SETCANDIDATEPOS           =  $0009;
  531.   IMN_SETCOMPOSITIONFONT        =  $000A;
  532.   IMN_SETCOMPOSITIONWINDOW      =  $000B;
  533.   IMN_SETSTATUSWINDOWPOS        =  $000C;
  534.   IMN_GUIDELINE                 =  $000D;
  535.   IMN_PRIVATE                   =  $000E;
  537.   // wParam of report message WM_IME_REQUEST
  538. const
  539.   IMR_COMPOSITIONWINDOW         =  $0001;
  540.   IMR_CANDIDATEWINDOW           =  $0002;
  541.   IMR_COMPOSITIONFONT           =  $0003;
  542.   IMR_RECONVERTSTRING           =  $0004;
  543.   IMR_CONFIRMRECONVERTSTRING    =  $0005;
  544.   IMR_QUERYCHARPOSITION         =  $0006;
  545.   IMR_DOCUMENTFEED              =  $0007;
  547.   // error code of ImmGetCompositionString
  548. const
  549.   IMM_ERROR_NODATA              =  -1;
  550.   IMM_ERROR_GENERAL             =  -2;
  552.   // dialog mode of ImmConfigureIME
  553. const
  554.   IME_CONFIG_GENERAL            =  1;
  555.   IME_CONFIG_REGISTERWORD       =  2;
  556.   IME_CONFIG_SELECTDICTIONARY   =  3;
  558.   // flags for ImmEscape
  559. const
  560.   IME_ESC_QUERY_SUPPORT         =  $0003;
  561.   IME_ESC_RESERVED_FIRST        =  $0004;
  562.   IME_ESC_RESERVED_LAST         =  $07FF;
  563.   IME_ESC_PRIVATE_FIRST         =  $0800;
  564.   IME_ESC_PRIVATE_LAST          =  $0FFF;
  566.   IME_ESC_SEQUENCE_TO_INTERNAL  =  $1001;
  567.   IME_ESC_GET_EUDC_DICTIONARY   =  $1003;
  568.   IME_ESC_SET_EUDC_DICTIONARY   =  $1004;
  569.   IME_ESC_MAX_KEY               =  $1005;
  570.   IME_ESC_IME_NAME              =  $1006;
  571.   IME_ESC_SYNC_HOTKEY           =  $1007;
  572.   IME_ESC_HANJA_MODE            =  $1008;
  573.   IME_ESC_AUTOMATA              =  $1009;
  574.   IME_ESC_PRIVATE_HOTKEY        =  $100a;
  575.   IME_ESC_GETHELPFILENAME       =  $100b;
  577.   // style of word registration
  578. const
  579.   IME_REGWORD_STYLE_EUDC        =  $00000001;
  580.   IME_REGWORD_STYLE_USER_FIRST  =  $80000000;
  581.   IME_REGWORD_STYLE_USER_LAST   =  $FFFFFFFF;
  583.   // dwFlags for ImmAssociateContextEx
  584. const
  585.   IACE_CHILDREN                 =  $0001;
  586.   IACE_DEFAULT                  =  $0010;
  587.   IACE_IGNORENOCONTEXT          =  $0020;
  589.   // dwFlags for ImmGetImeMenuItems
  590. const
  591.   IGIMIF_RIGHTMENU              =  $0001;
  593.   // dwType for ImmGetImeMenuItems
  594. const
  595.   IGIMII_CMODE                  =  $0001;
  596.   IGIMII_SMODE                  =  $0002;
  597.   IGIMII_CONFIGURE              =  $0004;
  598.   IGIMII_TOOLS                  =  $0008;
  599.   IGIMII_HELP                   =  $0010;
  600.   IGIMII_OTHER                  =  $0020;
  601.   IGIMII_INPUTTOOLS             =  $0040;
  603.   // fType of IMEMENUITEMINFO structure
  604. const
  605.   IMFT_RADIOCHECK   =  $00001;
  606.   IMFT_SEPARATOR    =  $00002;
  607.   IMFT_SUBMENU      =  $00004;
  609.   // fState of IMEMENUITEMINFO structure
  610. const
  611.   IMFS_GRAYED       =  MFS_GRAYED;
  612.   IMFS_DISABLED     =  MFS_DISABLED;
  613.   IMFS_CHECKED      =  MFS_CHECKED;
  614.   IMFS_HILITE       =  MFS_HILITE;
  615.   IMFS_ENABLED      =  MFS_ENABLED;
  616.   IMFS_UNCHECKED    =  MFS_UNCHECKED;
  617.   IMFS_UNHILITE     =  MFS_UNHILITE;
  618.   IMFS_DEFAULT      =  MFS_DEFAULT;
  620.   // type of soft keyboard
  621. const
  622.   SOFTKEYBOARD_TYPE_T1   = $0001;  // for Windows Tranditional Chinese Edition
  623.   SOFTKEYBOARD_TYPE_C1   = $0002;  // for Windows Simplified Chinese Edition
  626. type
  627.   PCompositionString = ^TCompositionString;
  628.   TCompositionString = record
  629.     dwSize: DWord;
  630.     dwCompReadAttrLen: DWord;
  631.     dwCompReadAttrOffset: DWord;
  632.     dwCompReadClauseLen: DWord;
  633.     dwCompReadClauseOffset: DWord;
  634.     dwCompReadStrLen: DWord;
  635.     dwCompReadStrOffset: DWord;
  636.     dwCompAttrLen: DWord;
  637.     dwCompAttrOffset: DWord;
  638.     dwCompClauseLen: DWord;
  639.     dwCompClauseOffset: DWord;
  640.     dwCompStrLen: DWord;
  641.     dwCompStrOffset: DWord;
  642.     dwCursorPos: DWord;
  643.     dwDeltaStart: DWord;
  644.     dwResultReadClauseLen: DWord;
  645.     dwResultReadClauseOffset: DWord;
  646.     dwResultReadStrLen: DWord;
  647.     dwResultReadStrOffset: DWord;
  648.     dwResultClauseLen: DWord;
  649.     dwResultClauseOffset: DWord;
  650.     dwResultStrLen: DWord;
  651.     dwResultStrOffset: DWord;
  652.     dwPrivateSize: DWord;
  653.     dwPrivateOffset: DWord;
  654.   end;
  656. type
  657.   PGuideLine = ^TGuideLine;
  658.   TGuideLine = record
  659.     dwSize: DWord;
  660.     dwLevel: DWord;
  661.     dwIndex: DWord;
  662.     dwStrLen: DWord;
  663.     dwStrOffset: DWord;
  664.     dwPrivateSize: DWord;
  665.     dwPrivateOffset: DWord;
  666.   end;
  668. type
  669.   PTransMsg = ^TTransMsg;
  670.   TTransMsg = record
  671.     message: uInt;
  672.     wParam: WParam;
  673.     lParam: LParam;
  674.   end;
  676.   PTransMsgList = ^TTransMsgList;
  677.   TTransMsgList = record
  678.     uMsgCount: uInt;
  679.     TransMsg: array[0..0] of TTransMsg;
  680.   end;
  682. type
  683.   PCandidateInfo = ^TCandidateInfo;
  684.   TCandidateInfo = record
  685.     dwSize: DWord;
  686.     dwCount: DWord;
  687.     dwOffset: array[0..31] of DWord;
  688.     dwPrivateSize: DWord;
  689.     dwPrivateOffset: DWord;
  690.   end;
  692. type
  693.   PInputContext = ^TInputContext;
  694.   TInputContext = record
  695.     hWnd: HWnd;
  696.     fOpen: Bool;
  697.     ptStatusWndPos: TPoint;
  698.     ptSoftKbdPos: TPoint;
  699.     fdwConversion: DWord;
  700.     fdwSentence: DWord;
  701.     lfFont: record
  702.       case Integer of
  703.         0: (A: TLogFontA);
  704.         1: (W: TLogFontW);
  705.     end;
  706.     cfCompForm: TCompositionForm;
  707.     cfCandForm: array[0..3] of TCandidateForm;
  708.     hCompStr: HImcc;
  709.     hCandInfo: HImcc;
  710.     hGuideLine: HImcc;
  711.     hPrivate: HImcc;
  712.     dwNumMsgBuf: DWord;
  713.     hMsgBuf: HImcc;
  714.     fdwInit: DWord;
  715.     dwReserve: array[0..2] of DWord;
  716.   end;
  718. type
  719.   PImeInfo = ^TImeInfo;
  720.   TImeInfo = record
  721.     dwPrivateDataSize: DWord;
  722.     fdwProperty: DWord;
  723.     fdwConversionCaps: DWord;
  724.     fdwSentenceCaps: DWord;
  725.     fdwUICaps: DWord;
  726.     fdwSCSCaps: DWord;
  727.     fdwSelectCaps: DWord;
  728.   end;
  730. type
  731.   PSoftKbdData = ^TSoftKbdData;
  732.   TSoftKbdData = record
  733.     uCount: UInt;
  734.     wCode: array[0..0, 0..255] of Word;
  735.   end;
  737. function ImmGetHotKey(dwHotKeyID: DWord; lpuModifiers, lpuVKey: PUInt; lphKL: PHKL): Bool; stdcall;
  738. function ImmSetHotKey(dwHotKeyID: DWord; uModifiers, uVKey: UInt; hKL: HKL): Bool; stdcall;
  739. function ImmGenerateMessage(hIMC: HImc): Bool; stdcall;
  741. function ImmRequestMessage(hImc: HImc; wParam: WParam; lParam: LParam): LResult; stdcall;
  742. function ImmRequestMessageA(hImc: HImc; wParam: WParam; lParam: LParam): LResult; stdcall;
  743. function ImmRequestMessageW(hImc: HImc; wParam: WParam; lParam: LParam): LResult; stdcall;
  746.   // Prototype of soft keyboard APIs ..
  748. function ImmCreateSoftKeyboard(uType: UInt; hOwner: HWnd; x, y: Integer): HWnd; stdcall;
  749. function ImmDestroySoftKeyboard(hSoftKbdWnd: HWnd): Bool; stdcall;
  750. function ImmShowSoftKeyboard(hSoftKbdWnd: HWnd; nCmdShow: Integer): Bool; stdcall;
  751. function ImmLockIMC(hIMC: HImc): PInputContext; stdcall;
  752. function ImmUnlockIMC(hIMC: HImc): Bool; stdcall;
  753. function ImmGetIMCLockCount(hIMC: HImc): DWord; stdcall;
  754. function ImmCreateIMCC(dwSize: DWord): HImcc; stdcall;
  755. function ImmDestroyIMCC(hIMCC: HImcc): HImcc; stdcall;
  756. function ImmLockIMCC(hIMCC: HImcc): Pointer; stdcall;
  757. function ImmUnlockIMCC(hIMCC: HImcc): Bool; stdcall;
  758. function ImmGetIMCCLockCount(hImcc: HImcc): DWord; stdcall;
  759. function ImmReSizeIMCC(hIMCC: HImcc; dwSize: DWord): HImcc; stdcall;
  760. function ImmGetIMCCSize(hIMCC: HImcc): DWord; stdcall;
  763.   // the window extra offset
  764. const
  765.   IMMGWL_IMC                    =  0;
  766.   IMMGWL_PRIVATE                =  SizeOf(Cardinal);
  767.   IMMGWLP_IMC                   =  0;
  768.   IMMGWLP_PRIVATE               =  SizeOf(Cardinal);
  770.   // for NI_CONTEXTUPDATED
  771. const
  772.   IMC_SETCONVERSIONMODE         =  $0002;
  773.   IMC_SETSENTENCEMODE           =  $0004;
  774.   IMC_SETOPENSTATUS             =  $0006;
  776.   // wParam for WM_IME_CONTROL to the soft keyboard
  777. const
  778.   IMC_GETSOFTKBDFONT            =  $0011;
  779.   IMC_SETSOFTKBDFONT            =  $0012;
  780.   IMC_GETSOFTKBDPOS             =  $0013;
  781.   IMC_SETSOFTKBDPOS             =  $0014;
  782.   IMC_GETSOFTKBDSUBTYPE         =  $0015;
  783.   IMC_SETSOFTKBDSUBTYPE         =  $0016;
  784.   IMC_SETSOFTKBDDATA            =  $0018;
  786.   // dwAction for ImmNotifyIME
  787. const
  788.   NI_CONTEXTUPDATED             =  $0003;
  790.   // dwSystemInfoFlags bits
  791. const
  792.   IME_SYSINFO_WINLOGON          =  $0001;
  793.   IME_SYSINFO_WOW16             =  $0002;
  795.   // parameter of ImmGetCompositionString, **
  796. const
  797.   GCS_COMP                      =  GCS_COMPSTR or GCS_COMPATTR or GCS_COMPCLAUSE;
  798.   GCS_COMPREAD                  =  GCS_COMPREADSTR or GCS_COMPREADATTR or GCS_COMPREADCLAUSE;
  799.   GCS_RESULT                    =  GCS_RESULTSTR or GCS_RESULTCLAUSE;
  800.   GCS_RESULTREAD                =  GCS_RESULTREADSTR or GCS_RESULTREADCLAUSE;
  802.   // bits of fdwInit of INPUTCONTEXT
  803. const
  804.   INIT_STATUSWNDPOS             =  $00000001;
  805.   INIT_CONVERSION               =  $00000002;
  806.   INIT_SENTENCE                 =  $00000004;
  807.   INIT_LOGFONT                  =  $00000008;
  808.   INIT_COMPFORM                 =  $00000010;
  809.   INIT_SOFTKBDPOS               =  $00000020;
  811.   // IME property bits
  812. const
  813.   IME_PROP_END_UNLOAD           =  $00000001;
  814.   IME_PROP_KBD_CHAR_FIRST       =  $00000002;
  815.   IME_PROP_IGNORE_UPKEYS        =  $00000004;
  816.   IME_PROP_NEED_ALTKEY          =  $00000008;
  817.   IME_PROP_NO_KEYS_ON_CLOSE     =  $00000010;
  818.   IME_PROP_ACCEPT_WIDE_VKEY     =  $00000020;
  820.   // IME UICapability bits
  821. const
  822.   UI_CAP_SOFTKBD                =  $00010000;
  824. const
  825.   IMN_SOFTKBDDESTROYED          =  $0011;
  827.   // flags for ImmEscape
  828. const
  829.   IME_ESC_PENAUXDATA            =  $100c;
  831.   // Pen Input support
  832. type
  833.   PImePenData = ^TImePenData;
  834.   TImePenData = record
  835.     dwVersion: DWord;
  836.     dwFlags: DWord;
  837.     dwCount: DWord;
  838.     lpExtraInfo: Pointer;
  839.     ulReserve: uLong;
  840.     wd: record
  841.       lpSymbol: PDWord;
  842.       lpSkip: PWord;
  843.       lpScore: PWord;
  844.     end;
  845.   end;
  847. const
  848.   IME_PEN_SYMBOL                =  $00000010;
  849.   IME_PEN_SKIP                  =  $00000020;
  850.   IME_PEN_SCORE                 =  $00000040;
  852. implementation
  854. const Imm32 = 'Imm32.dll';
  856. function ImmInstallIME; external Imm32 name 'ImmInstallIMEA';
  857. function ImmInstallIMEA; external Imm32 name 'ImmInstallIMEA';
  858. function ImmInstallIMEW; external Imm32 name 'ImmInstallIMEW';
  860. function ImmGetDefaultIMEWnd; external Imm32 name 'ImmGetDefaultIMEWnd';
  862. function ImmGetDescription; external Imm32 name 'ImmGetDescriptionA';
  863. function ImmGetDescriptionA; external Imm32 name 'ImmGetDescriptionA';
  864. function ImmGetDescriptionW; external Imm32 name 'ImmGetDescriptionW';
  866. function ImmGetIMEFileName; external Imm32 name 'ImmGetIMEFileNameA';
  867. function ImmGetIMEFileNameA; external Imm32 name 'ImmGetIMEFileNameA';
  868. function ImmGetIMEFileNameW; external Imm32 name 'ImmGetIMEFileNameW';
  870. function ImmGetProperty; external Imm32 name 'ImmGetProperty';
  872. function ImmIsIME; external Imm32 name 'ImmIsIME';
  874. function ImmSimulateHotKey; external Imm32 name 'ImmSimulateHotKey';
  876. function ImmCreateContext; external Imm32 name 'ImmCreateContext';
  877. function ImmDestroyContext; external Imm32 name 'ImmDestroyContext';
  878. function ImmGetContext; external Imm32 name 'ImmGetContext';
  879. function ImmReleaseContext; external Imm32 name 'ImmReleaseContext';
  880. function ImmAssociateContext; external Imm32 name 'ImmAssociateContext';
  881. function ImmAssociateContextEx; external Imm32 name 'ImmAssociateContextEx';
  883. function ImmGetCompositionString; external Imm32 name 'ImmGetCompositionStringA';
  884. function ImmGetCompositionStringA; external Imm32 name 'ImmGetCompositionStringA';
  885. function ImmGetCompositionStringW; external Imm32 name 'ImmGetCompositionStringW';
  887. function ImmSetCompositionString; external Imm32 name 'ImmSetCompositionStringA';
  888. function ImmSetCompositionStringA; external Imm32 name 'ImmSetCompositionStringA';
  889. function ImmSetCompositionStringW; external Imm32 name 'ImmSetCompositionStringW';
  891. function ImmGetCandidateListCount; external Imm32 name 'ImmGetCandidateListCountA';
  892. function ImmGetCandidateListCountA; external Imm32 name 'ImmGetCandidateListCountA';
  893. function ImmGetCandidateListCountW; external Imm32 name 'ImmGetCandidateListCountW';
  895. function ImmGetCandidateList; external Imm32 name 'ImmGetCandidateListA';
  896. function ImmGetCandidateListA; external Imm32 name 'ImmGetCandidateListA';
  897. function ImmGetCandidateListW; external Imm32 name 'ImmGetCandidateListW';
  899. function ImmGetGuideLine; external Imm32 name 'ImmGetGuideLineA';
  900. function ImmGetGuideLineA; external Imm32 name 'ImmGetGuideLineA';
  901. function ImmGetGuideLineW; external Imm32 name 'ImmGetGuideLineW';
  903. function ImmGetConversionStatus; external Imm32 name 'ImmGetConversionStatus';
  904. function ImmSetConversionStatus; external Imm32 name 'ImmSetConversionStatus';
  905. function ImmGetOpenStatus; external Imm32 name 'ImmGetOpenStatus';
  906. function ImmSetOpenStatus; external Imm32 name 'ImmSetOpenStatus';
  908. function ImmGetCompositionFont; external Imm32 name 'ImmGetCompositionFontA';
  909. function ImmGetCompositionFontA; external Imm32 name 'ImmGetCompositionFontA';
  910. function ImmGetCompositionFontW; external Imm32 name 'ImmGetCompositionFontW';
  912. function ImmSetCompositionFont; external Imm32 name 'ImmSetCompositionFontA';
  913. function ImmSetCompositionFontA; external Imm32 name 'ImmSetCompositionFontA';
  914. function ImmSetCompositionFontW; external Imm32 name 'ImmSetCompositionFontW';
  916. function ImmConfigureIME; external Imm32 name 'ImmConfigureIMEA';
  917. function ImmConfigureIMEA; external Imm32 name 'ImmConfigureIMEA';
  918. function ImmConfigureIMEW; external Imm32 name 'ImmConfigureIMEW';
  920. function ImmEscape; external Imm32 name 'ImmEscapeA';
  921. function ImmEscapeA; external Imm32 name 'ImmEscapeA';
  922. function ImmEscapeW; external Imm32 name 'ImmEscapeW';
  924. function ImmGetConversionList; external Imm32 name 'ImmGetConversionListA';
  925. function ImmGetConversionListA; external Imm32 name 'ImmGetConversionListA';
  926. function ImmGetConversionListW; external Imm32 name 'ImmGetConversionListW';
  928. function ImmNotifyIME; external Imm32 name 'ImmNotifyIME';
  930. function ImmGetStatusWindowPos; external Imm32 name 'ImmGetStatusWindowPos';
  931. function ImmSetStatusWindowPos; external Imm32 name 'ImmSetStatusWindowPos';
  932. function ImmGetCompositionWindow; external Imm32 name 'ImmGetCompositionWindow';
  933. function ImmSetCompositionWindow; external Imm32 name 'ImmSetCompositionWindow';
  934. function ImmGetCandidateWindow; external Imm32 name 'ImmGetCandidateWindow';
  935. function ImmSetCandidateWindow; external Imm32 name 'ImmSetCandidateWindow';
  937. function ImmIsUIMessage; external Imm32 name 'ImmIsUIMessageA';
  938. function ImmIsUIMessageA; external Imm32 name 'ImmIsUIMessageA';
  939. function ImmIsUIMessageW; external Imm32 name 'ImmIsUIMessageW';
  941. function ImmGetVirtualKey; external Imm32 name 'ImmGetVirtualKey';
  943. function ImmRegisterWord; external Imm32 name 'ImmRegisterWordA';
  944. function ImmRegisterWordA; external Imm32 name 'ImmRegisterWordA';
  945. function ImmRegisterWordW; external Imm32 name 'ImmRegisterWordW';
  947. function ImmUnregisterWord; external Imm32 name 'ImmUnregisterWordA';
  948. function ImmUnregisterWordA; external Imm32 name 'ImmUnregisterWordA';
  949. function ImmUnregisterWordW; external Imm32 name 'ImmUnregisterWordW';
  951. function ImmGetRegisterWordStyle; external Imm32 name 'ImmGetRegisterWordStyleA';
  952. function ImmGetRegisterWordStyleA; external Imm32 name 'ImmGetRegisterWordStyleA';
  953. function ImmGetRegisterWordStyleW; external Imm32 name 'ImmGetRegisterWordStyleW';
  955. function ImmEnumRegisterWord; external Imm32 name 'ImmEnumRegisterWordA';
  956. function ImmEnumRegisterWordA; external Imm32 name 'ImmEnumRegisterWordA';
  957. function ImmEnumRegisterWordW; external Imm32 name 'ImmEnumRegisterWordW';
  959. function ImmDisableIME; external Imm32 name 'ImmDisableIME';
  961. function ImmEnumInputContext; external Imm32 name 'ImmEnumInputContext';
  963. function ImmGetImeMenuItems; external Imm32 name 'ImmGetImeMenuItemsA';
  964. function ImmGetImeMenuItemsA; external Imm32 name 'ImmGetImeMenuItemsA';
  965. function ImmGetImeMenuItemsW; external Imm32 name 'ImmGetImeMenuItemsW';
  967. function ImmGetHotKey; external Imm32 name 'ImmGetHotKey';
  968. function ImmSetHotKey; external Imm32 name 'ImmSetHotKey';
  969. function ImmGenerateMessage; external Imm32 name 'ImmGenerateMessage';
  971. function ImmRequestMessage; external Imm32 name 'ImmRequestMessageA';
  972. function ImmRequestMessageA; external Imm32 name 'ImmRequestMessageA';
  973. function ImmRequestMessageW; external Imm32 name 'ImmRequestMessageW';
  975. function ImmCreateSoftKeyboard; external Imm32 name 'ImmCreateSoftKeyboard';
  976. function ImmDestroySoftKeyboard; external Imm32 name 'ImmDestroySoftKeyboard';
  977. function ImmShowSoftKeyboard; external Imm32 name 'ImmShowSoftKeyboard';
  978. function ImmLockIMC; external Imm32 name 'ImmLockIMC';
  979. function ImmUnlockIMC; external Imm32 name 'ImmUnlockIMC';
  980. function ImmGetIMCLockCount; external Imm32 name 'ImmGetIMCLockCount';
  981. function ImmCreateIMCC; external Imm32 name 'ImmCreateIMCC';
  982. function ImmDestroyIMCC; external Imm32 name 'ImmDestroyIMCC';
  983. function ImmLockIMCC; external Imm32 name 'ImmLockIMCC';
  984. function ImmUnlockIMCC; external Imm32 name 'ImmUnlockIMCC';
  985. function ImmGetIMCCLockCount; external Imm32 name 'ImmGetIMCCLockCount';
  986. function ImmReSizeIMCC; external Imm32 name 'ImmReSizeIMCC';
  987. function ImmGetIMCCSize; external Imm32 name 'ImmGetIMCCSize';
  989. end.