activeimm_tlb.pas

TNT Components Source

{*****************************************************************************}
{                                                                             }
{    Tnt Delphi Unicode Controls                                              }
{      http://www.tntware.com/delphicontrols/unicode/                         }
{        Version: 2.3.0                                                       }
{                                                                             }
{    Copyright (c) 2002-2007, Troy Wolbrink ([e-mail])       }
{                                                                             }
{*****************************************************************************}

unit ActiveIMM_TLB;

{$INCLUDE TntCompilers.inc}

{TNT-IGNORE-UNIT}

// ************************************************************************ //
// WARNING                                                                    
// -------                                                                    
// The types declared in this file were generated from data read from a       
// Type Library. If this type library is explicitly or indirectly (via        
// another type library referring to this type library) re-imported, or the   
// 'Refresh' command of the Type Library Editor activated while editing the   
// Type Library, the contents of this file will be regenerated and all        
// manual modifications will be lost.                                         
// ************************************************************************ //

// PASTLWTR : $Revision:   1.88.1.0.1.0  $
// File generated on 04/03/2001 11:32:13 PM from Type Library described below.

// *************************************************************************//
// NOTE:
// Items guarded by $IFDEF_LIVE_SERVER_AT_DESIGN_TIME are used by properties
// which return objects that may need to be explicitly created via a function
// call prior to any access via the property. These items have been disabled
// in order to prevent accidental use from within the object inspector. You
// may enable them by defining LIVE_SERVER_AT_DESIGN_TIME or by selectively
// removing them from the $IFDEF blocks. However, such items must still be
// programmatically created via a method of the appropriate CoClass before
// they can be used.
// ************************************************************************ //
// Type Lib: C:\Program Files\Microsoft Platform SDK\Include\dimm.tlb (1)
// IID\LCID: {4955DD30-B159-11D0-8FCF-00AA006BCC59}\0
// Helpfile: 
// DepndLst: 
//   (1) v2.0 stdole, (C:\WINNT\System32\Stdole2.tlb)
//   (2) v4.0 StdVCL, (C:\WINNT\System32\STDVCL40.DLL)
// Errors:
//   Hint: Member 'End' of 'IActiveIMMMessagePumpOwner' changed to 'End_'
//   Error creating palette bitmap of (TCActiveIMM) : Server D:\D5Addons\Dimm\dimm.dll contains no icons
// ************************************************************************ //
{$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers. 
interface

uses
  Windows, ActiveX, Classes, OleServer;

// *********************************************************************//
// GUIDS declared in the TypeLibrary. Following prefixes are used:        
//   Type Libraries     : LIBID_xxxx                                      
//   CoClasses          : CLASS_xxxx                                      
//   DISPInterfaces     : DIID_xxxx                                       
//   Non-DISP interfaces: IID_xxxx                                        
// *********************************************************************//
const
  // TypeLibrary Major and minor versions
  ActiveIMMMajorVersion = 0;
  ActiveIMMMinorVersion = 1;

  LIBID_ActiveIMM: TGUID = '{4955DD30-B159-11D0-8FCF-00AA006BCC59}';

  IID_IEnumRegisterWordA: TGUID = '{08C03412-F96B-11D0-A475-00AA006BCC59}';
  IID_IEnumRegisterWordW: TGUID = '{4955DD31-B159-11D0-8FCF-00AA006BCC59}';
  IID_IEnumInputContext: TGUID = '{09B5EAB0-F997-11D1-93D4-0060B067B86E}';
  IID_IActiveIMMRegistrar: TGUID = '{B3458082-BD00-11D1-939B-0060B067B86E}';
  IID_IActiveIMMMessagePumpOwner: TGUID = '{B5CF2CFA-8AEB-11D1-9364-0060B067B86E}';
  IID_IActiveIMMApp: TGUID = '{08C0E040-62D1-11D1-9326-0060B067B86E}';
  IID_IActiveIMMIME: TGUID = '{08C03411-F96B-11D0-A475-00AA006BCC59}';
  IID_IActiveIME: TGUID = '{6FE20962-D077-11D0-8FE7-00AA006BCC59}';
  IID_IActiveIME2: TGUID = '{E1C4BF0E-2D53-11D2-93E1-0060B067B86E}';
  CLASS_CActiveIMM: TGUID = '{4955DD33-B159-11D0-8FCF-00AA006BCC59}';
type

// *********************************************************************//
// Forward declaration of types defined in TypeLibrary                    
// *********************************************************************//
  IEnumRegisterWordA = interface;
  IEnumRegisterWordW = interface;
  IEnumInputContext = interface;
  IActiveIMMRegistrar = interface;
  IActiveIMMMessagePumpOwner = interface;
  IActiveIMMApp = interface;
  IActiveIMMIME = interface;
  IActiveIME = interface;
  IActiveIME2 = interface;

// *********************************************************************//
// Declaration of CoClasses defined in Type Library                       
// (NOTE: Here we map each CoClass to its Default Interface)              
// *********************************************************************//
  CActiveIMM = IActiveIMMApp;


// *********************************************************************//
// Declaration of structures, unions and aliases.                         
// *********************************************************************//
  wireHBITMAP = ^_userHBITMAP; 
  wireHWND = ^_RemotableHandle; 
  PUserType1 = ^TGUID; {*}
  PUserType2 = ^tagMSG; {*}
  PUserType3 = ^REGISTERWORDA; {*}
  PUserType4 = ^REGISTERWORDW; {*}
  PUserType5 = ^CANDIDATEFORM; {*}
  PUserType6 = ^LOGFONTA; {*}
  PUserType7 = ^LOGFONTW; {*}
  PUserType8 = ^COMPOSITIONFORM; {*}
  PUserType9 = ^tagPOINT; {*}
  PWord1 = ^Word; {*}
  PUserType10 = ^IMEMENUITEMINFOA; {*}
  PUserType11 = ^IMEMENUITEMINFOW; {*}
  PUserType12 = ^INPUTCONTEXT; {*}
  PByte1 = ^Byte; {*}

  __MIDL___MIDL_itf_dimm_0000_0001 = packed record
    lpReading: PAnsiChar;
    lpWord: PAnsiChar;
  end;

  REGISTERWORDA = __MIDL___MIDL_itf_dimm_0000_0001; 

  __MIDL___MIDL_itf_dimm_0000_0002 = packed record
    lpReading: PWideChar;
    lpWord: PWideChar;
  end;

  REGISTERWORDW = __MIDL___MIDL_itf_dimm_0000_0002; 

  __MIDL___MIDL_itf_dimm_0000_0003 = packed record
    lfHeight: Integer;
    lfWidth: Integer;
    lfEscapement: Integer;
    lfOrientation: Integer;
    lfWeight: Integer;
    lfItalic: Byte;
    lfUnderline: Byte;
    lfStrikeOut: Byte;
    lfCharSet: Byte;
    lfOutPrecision: Byte;
    lfClipPrecision: Byte;
    lfQuality: Byte;
    lfPitchAndFamily: Byte;
    lfFaceName: array[0..31] of Shortint;
  end;

  LOGFONTA = __MIDL___MIDL_itf_dimm_0000_0003; 

  __MIDL___MIDL_itf_dimm_0000_0004 = packed record
    lfHeight: Integer;
    lfWidth: Integer;
    lfEscapement: Integer;
    lfOrientation: Integer;
    lfWeight: Integer;
    lfItalic: Byte;
    lfUnderline: Byte;
    lfStrikeOut: Byte;
    lfCharSet: Byte;
    lfOutPrecision: Byte;
    lfClipPrecision: Byte;
    lfQuality: Byte;
    lfPitchAndFamily: Byte;
    lfFaceName: array[0..31] of Word;
  end;

  LOGFONTW = __MIDL___MIDL_itf_dimm_0000_0004; 

  tagPOINT = packed record
    x: Integer;
    y: Integer;
  end;

  tagRECT = packed record
    left: Integer;
    top: Integer;
    right: Integer;
    bottom: Integer;
  end;

  __MIDL___MIDL_itf_dimm_0000_0005 = packed record
    dwIndex: LongWord;
    dwStyle: LongWord;
    ptCurrentPos: tagPOINT;
    rcArea: tagRECT;
  end;

  CANDIDATEFORM = __MIDL___MIDL_itf_dimm_0000_0005; 

  __MIDL___MIDL_itf_dimm_0000_0006 = packed record
    dwStyle: LongWord;
    ptCurrentPos: tagPOINT;
    rcArea: tagRECT;
  end;

  COMPOSITIONFORM = __MIDL___MIDL_itf_dimm_0000_0006; 

  __MIDL___MIDL_itf_dimm_0000_0007 = packed record
    dwSize: LongWord;
    dwStyle: LongWord;
    dwCount: LongWord;
    dwSelection: LongWord;
    dwPageStart: LongWord;
    dwPageSize: LongWord;
    dwOffset: array[0..0] of LongWord;
  end;

  CANDIDATELIST = __MIDL___MIDL_itf_dimm_0000_0007; 

  __MIDL___MIDL_itf_dimm_0000_0008 = packed record
    dwStyle: LongWord;
    szDescription: array[0..31] of Shortint;
  end;

  STYLEBUFA = __MIDL___MIDL_itf_dimm_0000_0008; 

  __MIDL___MIDL_itf_dimm_0000_0009 = packed record
    dwStyle: LongWord;
    szDescription: array[0..31] of Word;
  end;

  STYLEBUFW = __MIDL___MIDL_itf_dimm_0000_0009; 

  __MIDL___MIDL_itf_dimm_0000_0010 = packed record
    cbSize: SYSUINT;
    fType: SYSUINT;
    fState: SYSUINT;
    wID: SYSUINT;
    hbmpChecked: wireHBITMAP;
    hbmpUnchecked: wireHBITMAP;
    dwItemData: LongWord;
    szString: array[0..79] of Shortint;
    hbmpItem: wireHBITMAP;
  end;

  IMEMENUITEMINFOA = __MIDL___MIDL_itf_dimm_0000_0010; 

  _userBITMAP = packed record
    bmType: Integer;
    bmWidth: Integer;
    bmHeight: Integer;
    bmWidthBytes: Integer;
    bmPlanes: Word;
    bmBitsPixel: Word;