#usecom / #comfunc によるHSPのCOM呼び出し定義。数字は vtbl インデックス(0始まり)。クラスIDが無い場合 #usecom の末尾は "{}"、ある場合は "{CLSID}"。
出力引数:
#define global IID_IAnchor "{0FEB7E34-5A60-4356-8EF7-ABDEC2FF7CF8}"
#usecom global IAnchor IID_IAnchor "{}"
#comfunc global IAnchor_SetGravity 3 int
#comfunc global IAnchor_GetGravity 4 var
#comfunc global IAnchor_IsEqual 5 sptr,var
#comfunc global IAnchor_Compare 6 sptr,var
#comfunc global IAnchor_Shift 7 int,int,var,sptr
#comfunc global IAnchor_ShiftTo 8 sptr
#comfunc global IAnchor_ShiftRegion 9 int,int,var
#comfunc global IAnchor_SetChangeHistoryMask 10 int
#comfunc global IAnchor_GetChangeHistory 11 var
#comfunc global IAnchor_ClearChangeHistory 12
#comfunc global IAnchor_Clone 13 sptr
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数は var(変数直渡し)。varptr 方式にも切替可。
; ※ハンドル/void*等の不透明ポインタは IronHSP では intptr 指定が可能。#define global IID_IAnchor "{0FEB7E34-5A60-4356-8EF7-ABDEC2FF7CF8}"
#usecom global IAnchor IID_IAnchor "{}"
#comfunc global IAnchor_SetGravity 3 int
#comfunc global IAnchor_GetGravity 4 sptr
#comfunc global IAnchor_IsEqual 5 sptr,sptr
#comfunc global IAnchor_Compare 6 sptr,sptr
#comfunc global IAnchor_Shift 7 int,int,sptr,sptr
#comfunc global IAnchor_ShiftTo 8 sptr
#comfunc global IAnchor_ShiftRegion 9 int,int,sptr
#comfunc global IAnchor_SetChangeHistoryMask 10 int
#comfunc global IAnchor_GetChangeHistory 11 sptr
#comfunc global IAnchor_ClearChangeHistory 12
#comfunc global IAnchor_Clone 13 sptr
; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。
; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。
; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
; ※ハンドル/void*等の不透明ポインタは IronHSP では intptr 指定が可能。