activeimm_tlb.pas

TNT Components Source

function  TCActiveIMM.EscapeA(var hKL: Pointer; hIMC: LongWord; uEscape: SYSUINT; 
                              var pData: Pointer; out plResult: LONG_PTR): HResult;
begin
  Result := DefaultInterface.EscapeA(hKL, hIMC, uEscape, pData, plResult);
end;

function  TCActiveIMM.EscapeW(var hKL: Pointer; hIMC: LongWord; uEscape: SYSUINT; 
                              var pData: Pointer; out plResult: LONG_PTR): HResult;
begin
  Result := DefaultInterface.EscapeW(hKL, hIMC, uEscape, pData, plResult);
end;

function  TCActiveIMM.GetCandidateListA(hIMC: LongWord; dwIndex: LongWord; uBufLen: SYSUINT; 
                                        out pCandList: CANDIDATELIST; out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetCandidateListA(hIMC, dwIndex, uBufLen, pCandList, puCopied);
end;

function  TCActiveIMM.GetCandidateListW(hIMC: LongWord; dwIndex: LongWord; uBufLen: SYSUINT; 
                                        out pCandList: CANDIDATELIST; out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetCandidateListW(hIMC, dwIndex, uBufLen, pCandList, puCopied);
end;

function  TCActiveIMM.GetCandidateListCountA(hIMC: LongWord; out pdwListSize: LongWord; 
                                             out pdwBufLen: LongWord): HResult;
begin
  Result := DefaultInterface.GetCandidateListCountA(hIMC, pdwListSize, pdwBufLen);
end;

function  TCActiveIMM.GetCandidateListCountW(hIMC: LongWord; out pdwListSize: LongWord; 
                                             out pdwBufLen: LongWord): HResult;
begin
  Result := DefaultInterface.GetCandidateListCountW(hIMC, pdwListSize, pdwBufLen);
end;

function  TCActiveIMM.GetCandidateWindow(hIMC: LongWord; dwIndex: LongWord; 
                                         out pCandidate: CANDIDATEFORM): HResult;
begin
  Result := DefaultInterface.GetCandidateWindow(hIMC, dwIndex, pCandidate);
end;

function  TCActiveIMM.GetCompositionFontA(hIMC: LongWord; out plf: LOGFONTA): HResult;
begin
  Result := DefaultInterface.GetCompositionFontA(hIMC, plf);
end;

function  TCActiveIMM.GetCompositionFontW(hIMC: LongWord; out plf: LOGFONTW): HResult;
begin
  Result := DefaultInterface.GetCompositionFontW(hIMC, plf);
end;

function  TCActiveIMM.GetCompositionStringA(hIMC: LongWord; dwIndex: LongWord; dwBufLen: LongWord; 
                                            out plCopied: Integer; out pBuf: Pointer): HResult;
begin
  Result := DefaultInterface.GetCompositionStringA(hIMC, dwIndex, dwBufLen, plCopied, pBuf);
end;

function  TCActiveIMM.GetCompositionStringW(hIMC: LongWord; dwIndex: LongWord; dwBufLen: LongWord; 
                                            out plCopied: Integer; out pBuf: Pointer): HResult;
begin
  Result := DefaultInterface.GetCompositionStringW(hIMC, dwIndex, dwBufLen, plCopied, pBuf);
end;

function  TCActiveIMM.GetCompositionWindow(hIMC: LongWord; out pCompForm: COMPOSITIONFORM): HResult;
begin
  Result := DefaultInterface.GetCompositionWindow(hIMC, pCompForm);
end;

function  TCActiveIMM.GetContext(var hWnd: _RemotableHandle; out phIMC: LongWord): HResult;
begin
  Result := DefaultInterface.GetContext(hWnd, phIMC);
end;

function  TCActiveIMM.GetConversionListA(var hKL: Pointer; hIMC: LongWord; pSrc: PAnsiChar; 
                                         uBufLen: SYSUINT; uFlag: SYSUINT; out pDst: CANDIDATELIST; 
                                         out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetConversionListA(hKL, hIMC, pSrc, uBufLen, uFlag, pDst, puCopied);
end;

function  TCActiveIMM.GetConversionListW(var hKL: Pointer; hIMC: LongWord; pSrc: PWideChar; 
                                         uBufLen: SYSUINT; uFlag: SYSUINT; out pDst: CANDIDATELIST; 
                                         out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetConversionListW(hKL, hIMC, pSrc, uBufLen, uFlag, pDst, puCopied);
end;

function  TCActiveIMM.GetConversionStatus(hIMC: LongWord; out pfdwConversion: LongWord; 
                                          out pfdwSentence: LongWord): HResult;
begin
  Result := DefaultInterface.GetConversionStatus(hIMC, pfdwConversion, pfdwSentence);
end;

function  TCActiveIMM.GetDefaultIMEWnd(var hWnd: _RemotableHandle; out phDefWnd: wireHWND): HResult;
begin
  Result := DefaultInterface.GetDefaultIMEWnd(hWnd, phDefWnd);
end;

function  TCActiveIMM.GetDescriptionA(var hKL: Pointer; uBufLen: SYSUINT; szDescription: PAnsiChar; 
                                      out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetDescriptionA(hKL, uBufLen, szDescription, puCopied);
end;

function  TCActiveIMM.GetDescriptionW(var hKL: Pointer; uBufLen: SYSUINT; szDescription: PWideChar; 
                                      out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetDescriptionW(hKL, uBufLen, szDescription, puCopied);
end;

function  TCActiveIMM.GetGuideLineA(hIMC: LongWord; dwIndex: LongWord; dwBufLen: LongWord; 
                                    pBuf: PAnsiChar; out pdwResult: LongWord): HResult;
begin
  Result := DefaultInterface.GetGuideLineA(hIMC, dwIndex, dwBufLen, pBuf, pdwResult);
end;

function  TCActiveIMM.GetGuideLineW(hIMC: LongWord; dwIndex: LongWord; dwBufLen: LongWord; 
                                    pBuf: PWideChar; out pdwResult: LongWord): HResult;
begin
  Result := DefaultInterface.GetGuideLineW(hIMC, dwIndex, dwBufLen, pBuf, pdwResult);
end;

function  TCActiveIMM.GetIMEFileNameA(var hKL: Pointer; uBufLen: SYSUINT; szFileName: PAnsiChar; 
                                      out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetIMEFileNameA(hKL, uBufLen, szFileName, puCopied);
end;

function  TCActiveIMM.GetIMEFileNameW(var hKL: Pointer; uBufLen: SYSUINT; szFileName: PWideChar; 
                                      out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetIMEFileNameW(hKL, uBufLen, szFileName, puCopied);
end;

function  TCActiveIMM.GetOpenStatus(hIMC: LongWord): HResult;
begin
  Result := DefaultInterface.GetOpenStatus(hIMC);
end;

function  TCActiveIMM.GetProperty(var hKL: Pointer; fdwIndex: LongWord; out pdwProperty: LongWord): HResult;
begin
  Result := DefaultInterface.GetProperty(hKL, fdwIndex, pdwProperty);
end;

function  TCActiveIMM.GetRegisterWordStyleA(var hKL: Pointer; nItem: SYSUINT; 
                                            out pStyleBuf: STYLEBUFA; out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetRegisterWordStyleA(hKL, nItem, pStyleBuf, puCopied);
end;

function  TCActiveIMM.GetRegisterWordStyleW(var hKL: Pointer; nItem: SYSUINT; 
                                            out pStyleBuf: STYLEBUFW; out puCopied: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetRegisterWordStyleW(hKL, nItem, pStyleBuf, puCopied);
end;

function  TCActiveIMM.GetStatusWindowPos(hIMC: LongWord; out pptPos: tagPOINT): HResult;
begin
  Result := DefaultInterface.GetStatusWindowPos(hIMC, pptPos);
end;

function  TCActiveIMM.GetVirtualKey(var hWnd: _RemotableHandle; out puVirtualKey: SYSUINT): HResult;
begin
  Result := DefaultInterface.GetVirtualKey(hWnd, puVirtualKey);
end;

function  TCActiveIMM.InstallIMEA(szIMEFileName: PAnsiChar; szLayoutText: PAnsiChar; out phKL: Pointer): HResult;
begin
  Result := DefaultInterface.InstallIMEA(szIMEFileName, szLayoutText, phKL);
end;

function  TCActiveIMM.InstallIMEW(szIMEFileName: PWideChar; szLayoutText: PWideChar; 
                                  out phKL: Pointer): HResult;
begin
  Result := DefaultInterface.InstallIMEW(szIMEFileName, szLayoutText, phKL);
end;

function  TCActiveIMM.IsIME(var hKL: Pointer): HResult;
begin
  Result := DefaultInterface.IsIME(hKL);
end;

function  TCActiveIMM.IsUIMessageA(var hWndIME: _RemotableHandle; msg: SYSUINT; wParam: UINT_PTR; 
                                   lParam: LONG_PTR): HResult;
begin
  Result := DefaultInterface.IsUIMessageA(hWndIME, msg, wParam, lParam);
end;

function  TCActiveIMM.IsUIMessageW(var hWndIME: _RemotableHandle; msg: SYSUINT; wParam: UINT_PTR; 
                                   lParam: LONG_PTR): HResult;
begin
  Result := DefaultInterface.IsUIMessageW(hWndIME, msg, wParam, lParam);
end;

function  TCActiveIMM.NotifyIME(hIMC: LongWord; dwAction: LongWord; dwIndex: LongWord; 
                                dwValue: LongWord): HResult;
begin
  Result := DefaultInterface.NotifyIME(hIMC, dwAction, dwIndex, dwValue);
end;

function  TCActiveIMM.REGISTERWORDA(var hKL: Pointer; szReading: PAnsiChar; dwStyle: LongWord; 
                                    szRegister: PAnsiChar): HResult;
begin
  Result := DefaultInterface.REGISTERWORDA(hKL, szReading, dwStyle, szRegister);
end;

function  TCActiveIMM.REGISTERWORDW(var hKL: Pointer; szReading: PWideChar; dwStyle: LongWord; 
                                    szRegister: PWideChar): HResult;
begin
  Result := DefaultInterface.REGISTERWORDW(hKL, szReading, dwStyle, szRegister);
end;

function  TCActiveIMM.ReleaseContext(var hWnd: _RemotableHandle; hIMC: LongWord): HResult;
begin
  Result := DefaultInterface.ReleaseContext(hWnd, hIMC);
end;

function  TCActiveIMM.SetCandidateWindow(hIMC: LongWord; var pCandidate: CANDIDATEFORM): HResult;
begin
  Result := DefaultInterface.SetCandidateWindow(hIMC, pCandidate);
end;

function  TCActiveIMM.SetCompositionFontA(hIMC: LongWord; var plf: LOGFONTA): HResult;
begin
  Result := DefaultInterface.SetCompositionFontA(hIMC, plf);
end;

function  TCActiveIMM.SetCompositionFontW(hIMC: LongWord; var plf: LOGFONTW): HResult;
begin
  Result := DefaultInterface.SetCompositionFontW(hIMC, plf);
end;

function  TCActiveIMM.SetCompositionStringA(hIMC: LongWord; dwIndex: LongWord; var pComp: Pointer; 
                                            dwCompLen: LongWord; var pRead: Pointer; 
                                            dwReadLen: LongWord): HResult;
begin
  Result := DefaultInterface.SetCompositionStringA(hIMC, dwIndex, pComp, dwCompLen, pRead, dwReadLen);
end;

function  TCActiveIMM.SetCompositionStringW(hIMC: LongWord; dwIndex: LongWord; var pComp: Pointer; 
                                            dwCompLen: LongWord; var pRead: Pointer; 
                                            dwReadLen: LongWord): HResult;
begin
  Result := DefaultInterface.SetCompositionStringW(hIMC, dwIndex, pComp, dwCompLen, pRead, dwReadLen);
end;

function  TCActiveIMM.SetCompositionWindow(hIMC: LongWord; var pCompForm: COMPOSITIONFORM): HResult;
begin
  Result := DefaultInterface.SetCompositionWindow(hIMC