#usecom / #comfunc によるHSPのCOM呼び出し定義。数字は vtbl インデックス(0始まり)。クラスIDが無い場合 #usecom の末尾は "{}"、ある場合は "{CLSID}"。
出力引数:
#define global IID_IWbemObjectAccess "{49353C9A-516B-11D1-AEA6-00C04FB68820}"
#usecom global IWbemObjectAccess IID_IWbemObjectAccess "{}"
#comfunc global IWbemObjectAccess_GetPropertyHandle 27 wstr,var,var
#comfunc global IWbemObjectAccess_WritePropertyValue 28 int,int,var
#comfunc global IWbemObjectAccess_ReadPropertyValue 29 int,int,var,var
#comfunc global IWbemObjectAccess_ReadDWORD 30 int,var
#comfunc global IWbemObjectAccess_WriteDWORD 31 int,int
#comfunc global IWbemObjectAccess_ReadQWORD 32 int,var
#comfunc global IWbemObjectAccess_WriteQWORD 33 int,int64
#comfunc global IWbemObjectAccess_GetPropertyInfoByHandle 34 int,var,var
#comfunc global IWbemObjectAccess_Lock 35 int
#comfunc global IWbemObjectAccess_Unlock 36 int
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数は var(変数直渡し)。varptr 方式にも切替可。#define global IID_IWbemObjectAccess "{49353C9A-516B-11D1-AEA6-00C04FB68820}"
#usecom global IWbemObjectAccess IID_IWbemObjectAccess "{}"
#comfunc global IWbemObjectAccess_GetPropertyHandle 27 wstr,sptr,sptr
#comfunc global IWbemObjectAccess_WritePropertyValue 28 int,int,sptr
#comfunc global IWbemObjectAccess_ReadPropertyValue 29 int,int,sptr,sptr
#comfunc global IWbemObjectAccess_ReadDWORD 30 int,sptr
#comfunc global IWbemObjectAccess_WriteDWORD 31 int,int
#comfunc global IWbemObjectAccess_ReadQWORD 32 int,sptr
#comfunc global IWbemObjectAccess_WriteQWORD 33 int,int64
#comfunc global IWbemObjectAccess_GetPropertyInfoByHandle 34 int,sptr,sptr
#comfunc global IWbemObjectAccess_Lock 35 int
#comfunc global IWbemObjectAccess_Unlock 36 int
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。