ICreateTypeLib Interface

IID_ICreateTypeLib

{00020406-0000-0000-C000-000000000046}

The ICreateTypeLib interface provides the methods for creating and managing the component or file that contains type information. Type libraries are created from type descriptions using the MIDL compiler. These type libraries are accessed through the ITypeLib interface.

Methods in VTable order

IUnknown Methods

Description

QueryInterface

Returns pointers to supported interfaces.

AddRef

Increments reference count.

Release

Decrements reference count.

ICreateTypeLib Methods

Description

CreateTypeInfo

Creates a new type description instance within the type library.

SetName

Sets the name of the type library.

SetVersion

Sets major and minor version numbers for the type library.

SetGuid

Sets the GUID for the type library.

SetDocString

Sets the documentation string for the type library.

SetHelpFileName

Sets the Help file name.

SetHelpContext

Sets the Help context ID for general information about the type library in the Help file.

SetLcid

Sets the locale identifier (LCID) code indicating the national language associated with the library.

SetLibFlags

Sets library flags, such as LIBFLAG_FRESTRICTED.

SaveAllChanges

Saves the ICreateTypeLib instance.

CreateTypeInfo

FUNCTION ICreateTypeLib_CreateTypeInfo ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL strName AS STRING _

, BYVAL tkind AS LONG _

, BYREF ppCTInfo AS DWORD _

  ) AS LONG

  LOCAL HRESULT AS LONG
  strName = UCODE$(strName & $NUL)
  CALL DWORD @@pthis[3] USING ICreateTypeLib_CreateTypeInfo (pthis, strName, tkind, ppCTInfo) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetName

FUNCTION ICreateTypeLib_SetName ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL strName AS STRING _

  ) AS LONG

  LOCAL HRESULT AS LONG
  strName = UCODE$(strName & $NUL)
  CALL DWORD @@pthis[4] USING ICreateTypeLib_SetName (pthis, strName) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetVersion

FUNCTION ICreateTypeLib_SetVersion ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL wMajorVerNum AS WORD _

, BYVAL wMinorVerNum AS WORD _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[5] USING ICreateTypeLib_SetVersion (pthis, wMajorVerNum, wMinorVerNum) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetGuid

FUNCTION ICreateTypeLib_SetGuid ( _

  BYVAL pthis AS DWORD PTR _

, BYREF rguid AS GUID _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[6] USING ICreateTypeLib_SetGuid (pthis, rguid) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetDocString

FUNCTION ICreateTypeLib_SetDocString ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL strDoc AS STRING _

  ) AS LONG

  LOCAL HRESULT AS LONG
  strDoc = UCODE$(strDoc & $NUL)
  CALL DWORD @@pthis[7] USING ICreateTypeLib_SetDocString (pthis, strDoc) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetHelpFileName

FUNCTION ICreateTypeLib_SetHelpFileName ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL strHelpFileName AS STRING _

  ) AS LONG

  LOCAL HRESULT AS LONG

  strHelpFileName = UCODE$(strHelpFileName & $NUL)
  CALL DWORD @@pthis[8] USING ICreateTypeLib_SetHelpFileName (pthis, strHelpFileName) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetHelpContext

FUNCTION ICreateTypeLib_SetHelpContext ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL dwHelpContext AS DWORD _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[9] USING ICreateTypeLib_SetHelpContext (pthis, dwHelpContext) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetLcid

FUNCTION ICreateTypeLib_SetLcid ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL lcid AS LONG _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[10] USING ICreateTypeLib_SetLcid (pthis, lcid) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SetLibFlags

FUNCTION ICreateTypeLib_SetLibFlags ( _

  BYVAL pthis AS DWORD PTR _

, BYVAL uLibFlags AS DWORD _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[11] USING ICreateTypeLib_SetLibFlags (pthis, uLibFlags) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION

SaveAllChanges

FUNCTION ICreateTypeLib_SaveAllChanges ( _

  BYVAL pthis AS DWORD PTR _

  ) AS LONG

  LOCAL HRESULT AS LONG
  CALL DWORD @@pthis[12] USING ICreateTypeLib_SaveAllChanges (pthis) TO HRESULT
  FUNCTION = HRESULT

END FUNCTION