vtbl = vtable インデックス(0始まり)。IDispatch 実装のため HSP ではメソッド名でも呼べます(上記)。低レベルの index 呼び出し用に vtbl も掲載。0〜2 は IUnknown。
#usecom / #comfunc によるHSPのCOM呼び出し定義。数字は vtbl インデックス(0始まり)。クラスIDが無い場合 #usecom の末尾は "{}"、ある場合は "{CLSID}"。
出力引数:
#define global IID_IDispatchEx "{A6EF9860-C720-11D0-9337-00A0C90DCAA9}"
#usecom global IDispatchEx IID_IDispatchEx "{}"
#comfunc global IDispatchEx_GetDispID 7 wstr,int,var
#comfunc global IDispatchEx_InvokeEx 8 int,int,int,var,var,var,sptr
#comfunc global IDispatchEx_DeleteMemberByName 9 wstr,int
#comfunc global IDispatchEx_DeleteMemberByDispID 10 int
#comfunc global IDispatchEx_GetMemberProperties 11 int,int,var
#comfunc global IDispatchEx_GetMemberName 12 int,var
#comfunc global IDispatchEx_GetNextDispID 13 int,int,var
#comfunc global IDispatchEx_GetNameSpaceParent 14 sptr
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数は var(変数直渡し)。varptr 方式にも切替可。
; ※ハンドル/void*等の不透明ポインタは IronHSP では intptr 指定が可能。
; ※IDispatch 実装。HSP では comobj 経由でメソッド名による呼び出しも可能(vtbl 不要)。#define global IID_IDispatchEx "{A6EF9860-C720-11D0-9337-00A0C90DCAA9}"
#usecom global IDispatchEx IID_IDispatchEx "{}"
#comfunc global IDispatchEx_GetDispID 7 wstr,int,sptr
#comfunc global IDispatchEx_InvokeEx 8 int,int,int,sptr,sptr,sptr,sptr
#comfunc global IDispatchEx_DeleteMemberByName 9 wstr,int
#comfunc global IDispatchEx_DeleteMemberByDispID 10 int
#comfunc global IDispatchEx_GetMemberProperties 11 int,int,sptr
#comfunc global IDispatchEx_GetMemberName 12 int,sptr
#comfunc global IDispatchEx_GetNextDispID 13 int,int,sptr
#comfunc global IDispatchEx_GetNameSpaceParent 14 sptr
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
; ※ハンドル/void*等の不透明ポインタは IronHSP では intptr 指定が可能。
; ※IDispatch 実装。HSP では comobj 経由でメソッド名による呼び出しも可能(vtbl 不要)。