MI_InstanceExFT

構造体

サイズx64: 152 バイト / x86: 76 バイト

サイズ=各フィールドのバイト数(x64/x86 で異なる場合は x64/x86 と併記)。x64/x86 列=フィールドのバイトオフセット(HSPで dupptr / lpoke / wpoke 等に使用)。

フィールド

フィールド	型	サイズ	x64	x86	説明
parent	MI_InstanceFT	144/72	+0	+0	基底のインスタンス関数テーブル(継承元)。
Normalize	INT_PTR	8/4	+144	+72	インスタンスを正規化する拡張関数へのポインタ。

各言語での定義

#include <windows.h>

// MI_InstanceFT  (x64 144 / x86 72 バイト)
typedef struct MI_InstanceFT {
    INT_PTR Clone;
    INT_PTR Destruct;
    INT_PTR Delete;
    INT_PTR IsA;
    INT_PTR GetClassNameA;
    INT_PTR SetNameSpace;
    INT_PTR GetNameSpace;
    INT_PTR GetElementCount;
    INT_PTR AddElement;
    INT_PTR SetElement;
    INT_PTR SetElementAt;
    INT_PTR GetElement;
    INT_PTR GetElementAt;
    INT_PTR ClearElement;
    INT_PTR ClearElementAt;
    INT_PTR GetServerName;
    INT_PTR SetServerName;
    INT_PTR GetClass;
} MI_InstanceFT;

// MI_InstanceExFT  (x64 152 / x86 76 バイト)
typedef struct MI_InstanceExFT {
    MI_InstanceFT parent;
    INT_PTR Normalize;
} MI_InstanceExFT;

using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct MI_InstanceFT
{
    public IntPtr Clone;
    public IntPtr Destruct;
    public IntPtr Delete;
    public IntPtr IsA;
    public IntPtr GetClassNameA;
    public IntPtr SetNameSpace;
    public IntPtr GetNameSpace;
    public IntPtr GetElementCount;
    public IntPtr AddElement;
    public IntPtr SetElement;
    public IntPtr SetElementAt;
    public IntPtr GetElement;
    public IntPtr GetElementAt;
    public IntPtr ClearElement;
    public IntPtr ClearElementAt;
    public IntPtr GetServerName;
    public IntPtr SetServerName;
    public IntPtr GetClass;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct MI_InstanceExFT
{
    public MI_InstanceFT parent;
    public IntPtr Normalize;
}

Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure MI_InstanceFT
    Public Clone As IntPtr
    Public Destruct As IntPtr
    Public Delete As IntPtr
    Public IsA As IntPtr
    Public GetClassNameA As IntPtr
    Public SetNameSpace As IntPtr
    Public GetNameSpace As IntPtr
    Public GetElementCount As IntPtr
    Public AddElement As IntPtr
    Public SetElement As IntPtr
    Public SetElementAt As IntPtr
    Public GetElement As IntPtr
    Public GetElementAt As IntPtr
    Public ClearElement As IntPtr
    Public ClearElementAt As IntPtr
    Public GetServerName As IntPtr
    Public SetServerName As IntPtr
    Public GetClass As IntPtr
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure MI_InstanceExFT
    Public parent As MI_InstanceFT
    Public Normalize As IntPtr
End Structure

import ctypes
from ctypes import wintypes

class MI_InstanceFT(ctypes.Structure):
    _fields_ = [
        ("Clone", ctypes.c_ssize_t),
        ("Destruct", ctypes.c_ssize_t),
        ("Delete", ctypes.c_ssize_t),
        ("IsA", ctypes.c_ssize_t),
        ("GetClassNameA", ctypes.c_ssize_t),
        ("SetNameSpace", ctypes.c_ssize_t),
        ("GetNameSpace", ctypes.c_ssize_t),
        ("GetElementCount", ctypes.c_ssize_t),
        ("AddElement", ctypes.c_ssize_t),
        ("SetElement", ctypes.c_ssize_t),
        ("SetElementAt", ctypes.c_ssize_t),
        ("GetElement", ctypes.c_ssize_t),
        ("GetElementAt", ctypes.c_ssize_t),
        ("ClearElement", ctypes.c_ssize_t),
        ("ClearElementAt", ctypes.c_ssize_t),
        ("GetServerName", ctypes.c_ssize_t),
        ("SetServerName", ctypes.c_ssize_t),
        ("GetClass", ctypes.c_ssize_t),
    ]

class MI_InstanceExFT(ctypes.Structure):
    _fields_ = [
        ("parent", MI_InstanceFT),
        ("Normalize", ctypes.c_ssize_t),
    ]

#[repr(C)]
pub struct MI_InstanceFT {
    pub Clone: isize,
    pub Destruct: isize,
    pub Delete: isize,
    pub IsA: isize,
    pub GetClassNameA: isize,
    pub SetNameSpace: isize,
    pub GetNameSpace: isize,
    pub GetElementCount: isize,
    pub AddElement: isize,
    pub SetElement: isize,
    pub SetElementAt: isize,
    pub GetElement: isize,
    pub GetElementAt: isize,
    pub ClearElement: isize,
    pub ClearElementAt: isize,
    pub GetServerName: isize,
    pub SetServerName: isize,
    pub GetClass: isize,
}

#[repr(C)]
pub struct MI_InstanceExFT {
    pub parent: MI_InstanceFT,
    pub Normalize: isize,
}

import "golang.org/x/sys/windows"

type MI_InstanceFT struct {
	Clone uintptr
	Destruct uintptr
	Delete uintptr
	IsA uintptr
	GetClassNameA uintptr
	SetNameSpace uintptr
	GetNameSpace uintptr
	GetElementCount uintptr
	AddElement uintptr
	SetElement uintptr
	SetElementAt uintptr
	GetElement uintptr
	GetElementAt uintptr
	ClearElement uintptr
	ClearElementAt uintptr
	GetServerName uintptr
	SetServerName uintptr
	GetClass uintptr
}

type MI_InstanceExFT struct {
	parent MI_InstanceFT
	Normalize uintptr
}

type
  MI_InstanceFT = record
    Clone: NativeInt;
    Destruct: NativeInt;
    Delete: NativeInt;
    IsA: NativeInt;
    GetClassNameA: NativeInt;
    SetNameSpace: NativeInt;
    GetNameSpace: NativeInt;
    GetElementCount: NativeInt;
    AddElement: NativeInt;
    SetElement: NativeInt;
    SetElementAt: NativeInt;
    GetElement: NativeInt;
    GetElementAt: NativeInt;
    ClearElement: NativeInt;
    ClearElementAt: NativeInt;
    GetServerName: NativeInt;
    SetServerName: NativeInt;
    GetClass: NativeInt;
  end;

  MI_InstanceExFT = record
    parent: MI_InstanceFT;
    Normalize: NativeInt;
  end;

const MI_InstanceFT = extern struct {
    Clone: isize,
    Destruct: isize,
    Delete: isize,
    IsA: isize,
    GetClassNameA: isize,
    SetNameSpace: isize,
    GetNameSpace: isize,
    GetElementCount: isize,
    AddElement: isize,
    SetElement: isize,
    SetElementAt: isize,
    GetElement: isize,
    GetElementAt: isize,
    ClearElement: isize,
    ClearElementAt: isize,
    GetServerName: isize,
    SetServerName: isize,
    GetClass: isize,
};

const MI_InstanceExFT = extern struct {
    parent: MI_InstanceFT,
    Normalize: isize,
};

type
  MI_InstanceFT {.bycopy.} = object
    Clone: int
    Destruct: int
    Delete: int
    IsA: int
    GetClassNameA: int
    SetNameSpace: int
    GetNameSpace: int
    GetElementCount: int
    AddElement: int
    SetElement: int
    SetElementAt: int
    GetElement: int
    GetElementAt: int
    ClearElement: int
    ClearElementAt: int
    GetServerName: int
    SetServerName: int
    GetClass: int

  MI_InstanceExFT {.bycopy.} = object
    parent: MI_InstanceFT
    Normalize: int

struct MI_InstanceFT
{
    ptrdiff_t Clone;
    ptrdiff_t Destruct;
    ptrdiff_t Delete;
    ptrdiff_t IsA;
    ptrdiff_t GetClassNameA;
    ptrdiff_t SetNameSpace;
    ptrdiff_t GetNameSpace;
    ptrdiff_t GetElementCount;
    ptrdiff_t AddElement;
    ptrdiff_t SetElement;
    ptrdiff_t SetElementAt;
    ptrdiff_t GetElement;
    ptrdiff_t GetElementAt;
    ptrdiff_t ClearElement;
    ptrdiff_t ClearElementAt;
    ptrdiff_t GetServerName;
    ptrdiff_t SetServerName;
    ptrdiff_t GetClass;
}

struct MI_InstanceExFT
{
    MI_InstanceFT parent;
    ptrdiff_t Normalize;
}

HSP用定義

HSP3.7/3.8 は構造体機能が無いため4byte整数配列(dim)+peek/poke で操作(32/64bitでサイズ・位置が異なる場合はタブで分割)。IronHSP は NSTRUCT(#defstruct/stdim/->)で32/64bit共通。

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; MI_InstanceExFT サイズ: 76 バイト(x86)
dim st, 19    ; 4byte整数×19(構造体サイズ 76 / 4 切り上げ)
; parent : MI_InstanceFT (+0, 72byte)  varptr(st)+0 を基点に操作(72byte:入れ子/配列)
; Normalize : INT_PTR (+72, 4byte)  st.18 = 値  /  値 = st.18   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; MI_InstanceExFT サイズ: 152 バイト(x64)
dim st, 38    ; 4byte整数×38(構造体サイズ 152 / 4 切り上げ)
; parent : MI_InstanceFT (+0, 144byte)  varptr(st)+0 を基点に操作(144byte:入れ子/配列)
; Normalize : INT_PTR (+144, 8byte)  qpoke st,144,値 / qpeek(st,144)  ※IronHSPのみ。3.7/3.8は lpoke st,144,下位 : lpoke st,148,上位
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。

; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global MI_InstanceFT
    #field intptr Clone
    #field intptr Destruct
    #field intptr Delete
    #field intptr IsA
    #field intptr GetClassNameA
    #field intptr SetNameSpace
    #field intptr GetNameSpace
    #field intptr GetElementCount
    #field intptr AddElement
    #field intptr SetElement
    #field intptr SetElementAt
    #field intptr GetElement
    #field intptr GetElementAt
    #field intptr ClearElement
    #field intptr ClearElementAt
    #field intptr GetServerName
    #field intptr SetServerName
    #field intptr GetClass
#endstruct

#defstruct global MI_InstanceExFT
    #field MI_InstanceFT parent
    #field intptr Normalize
#endstruct

stdim st, MI_InstanceExFT        ; NSTRUCT 変数を確保
st->Normalize = 100
mes "Normalize=" + st->Normalize

MI_InstanceExFT

フィールド

各言語での定義

HSP用 定義

HSP用定義