Win32 API 日本語リファレンス
ホームSystem.Ole › OLEUIINSERTOBJECTA

OLEUIINSERTOBJECTA

構造体
サイズx64: 176 バイト / x86: 112 バイト

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

フィールド

フィールドサイズx64x86説明
cbStructDWORD4+0+0構造体のサイズ (バイト単位)。このフィールドは入力時に設定しておく必要があります。
dwFlagsINSERT_OBJECT_FLAGS4+4+4

入力時には初期化フラグおよび作成フラグを指定します。終了時にはユーザーの選択内容を示します。次のフラグの組み合わせを指定できます。

意味
IOF_SHOWHELP
ダイアログボックスに Help ボタンを表示します。
IOF_SELECTCREATENEW
Create New ラジオボタンが初期状態でオンになります。これは IOF_SELECTCREATEFROMFILE と併用できません。
IOF_SELECTCREATEFROMFILE
Create From File ラジオボタンが初期状態でオンになります。これは IOF_SELECTCREATENEW と併用できません。
IOF_CHECKLINK
Link チェックボックスが初期状態でオンになります。
IOF_CHECKDISPLAYASICON
Display As Icon チェックボックスが初期状態でオンになり、現在のアイコンが表示され、Change Icon ボタンが有効になります。
IOF_CREATENEWOBJECT
Create New ラジオボタンが選択された状態でユーザーが OK を選択してダイアログボックスを閉じた場合、新しいオブジェクトを作成します。
IOF_CREATEFILEOBJECT
Create From File ラジオボタンが選択された状態でユーザーが OK を選択してダイアログボックスを閉じた場合、指定されたファイルから新しいオブジェクトを作成します。
IOF_CREATELINKOBJECT
ユーザーが Link チェックボックスをオンにした状態で OK を選択してダイアログボックスを閉じた場合、新しいリンクオブジェクトを作成します。
IOF_DISABLELINK
初期化時に Link チェックボックスが無効になります。
IOF_VERIFYSERVERSEXIST
ダイアログボックスは、リストボックスに追加するクラスについて、登録データベースで指定されたサーバーが存在することを確認して検証します。これはパフォーマンスに大きく影響する要因です。
IOF_DISABLEDISPLAYASICON
初期化時に Display As Icon チェックボックスが無効になります。
IOF_HIDECHANGEICON
Insert Object ダイアログボックスで Change Icon ボタンが非表示になります。
IOF_SHOWINSERTCONTROL
Insert Control ラジオボタンを表示します。
IOF_SELECTCREATECONTROL
Create Control ラジオボタンを表示します。
hWndOwnerHWND8/4+8+8ダイアログボックスを所有するウィンドウ。このメンバーを NULL にすることはできません。
lpszCaptionLPSTR8/4+16+12ダイアログボックスのタイトルとして使用する文字列へのポインター。NULL の場合、ライブラリは Insert Object を使用します。
lpfnHookLPFNOLEUIHOOK8/4+24+16ダイアログボックス宛てのメッセージを処理するフック関数へのポインター。フック関数は、処理しなかったメッセージをライブラリのダイアログボックスプロシージャに渡すために 0 を返さなければなりません。既に処理したメッセージをライブラリのダイアログボックスプロシージャが処理しないようにするには、フック関数は 0 以外の値を返さなければなりません。
lCustDataLPARAM8/4+32+20lpfnHook メンバーが指すフック関数にライブラリが渡す、アプリケーション定義のデータ。ライブラリは WM_INITDIALOG メッセージの lParam パラメーターで OLEUIINSERTOBJECT 構造体へのポインターを渡します。このポインターを使用して lCustData メンバーを取得できます。
hInstanceHINSTANCE8/4+40+24lpTemplateName メンバーで指定されたダイアログボックステンプレートを格納しているインスタンス。
lpszTemplateLPSTR8/4+48+28ライブラリの Insert Object ダイアログボックステンプレートの代わりに使用する、ダイアログボックステンプレートのリソースファイル名を指定する null で終わる文字列へのポインター。
hResourceHRSRC8/4+56+32カスタマイズされたテンプレートのハンドル。
clsidGUID16+64+36挿入するオブジェクトのクラスの CLSID。出力時に設定されます。
lpszFileLPSTR8/4+80+52リンクまたは埋め込みを行うファイルの名前へのポインター。出力時に設定されます。
cchFileDWORD4+88+56lpszFile バッファーのサイズ。MAX_PATH を超えることはありません。
cClsidExcludeDWORD4+92+60lpClsidExclude の一覧に含まれる CLSID の数。入力時に設定します。
lpClsidExcludeGUID*8/4+96+64一覧表示から除外する CLSID のリストへのポインター。
iidGUID16+104+68要求するインターフェイスの識別子。OleUIInsertObject がオブジェクトを作成する場合、このインターフェイスへのポインターが返されます。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
oleRenderDWORD4+120+84レンダリングオプション。OleUIInsertObject がオブジェクトを作成する場合、オブジェクトの作成時にこのレンダリングオプションが選択されます。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
lpFormatEtcFORMATETC*8/4+128+88必要な形式。OleUIInsertObject がオブジェクトを作成する場合、オブジェクトの作成時にこの形式が選択されます。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
lpIOleClientSiteIOleClientSite*8/4+136+92オブジェクトに使用するクライアントサイトへのポインター。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
lpIStorageIStorage*8/4+144+96オブジェクトに使用するストレージへのポインター。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
ppvObjvoid**8/4+152+100挿入されるオブジェクトのインターフェイスポインターを受け取る出力ポインター変数のアドレス。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
scINT4+160+104作成呼び出しの結果。OleUIInsertObject がオブジェクトを作成しない場合、このパラメーターは無視されます。
hMetaPictHGLOBAL8/4+168+108オブジェクトのキャッシュに配置されなかった場合の、アイコン表示のアスペクトを格納する MetafilePict 構造体。

公式ドキュメント

OLE ユーザーインターフェイスライブラリが Insert Object ダイアログボックスを初期化するために使用する情報と、ダイアログボックスが閉じられたときにライブラリが情報を返すための領域を格納します。

解説(Remarks)

メモ

oledlg.h ヘッダーは、UNICODE プリプロセッサ定数の定義に基づいてこの関数の ANSI 版または Unicode 版を自動的に選択するエイリアスとして OLEUIINSERTOBJECT を定義しています。エンコーディング中立のエイリアスと、エンコーディング中立でないコードを混在させて使用すると、不一致が生じ、コンパイルエラーや実行時エラーの原因となることがあります。詳細については、Conventions for Function Prototypes を参照してください。

出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)

各言語での定義

#include <windows.h>

// OLEUIINSERTOBJECTA  (x64 176 / x86 112 バイト)
typedef struct OLEUIINSERTOBJECTA {
    DWORD cbStruct;
    INSERT_OBJECT_FLAGS dwFlags;
    HWND hWndOwner;
    LPSTR lpszCaption;
    LPFNOLEUIHOOK lpfnHook;
    LPARAM lCustData;
    HINSTANCE hInstance;
    LPSTR lpszTemplate;
    HRSRC hResource;
    GUID clsid;
    LPSTR lpszFile;
    DWORD cchFile;
    DWORD cClsidExclude;
    GUID* lpClsidExclude;
    GUID iid;
    DWORD oleRender;
    FORMATETC* lpFormatEtc;
    IOleClientSite* lpIOleClientSite;
    IStorage* lpIStorage;
    void** ppvObj;
    INT sc;
    HGLOBAL hMetaPict;
} OLEUIINSERTOBJECTA;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct OLEUIINSERTOBJECTA
{
    public uint cbStruct;
    public uint dwFlags;
    public IntPtr hWndOwner;
    public IntPtr lpszCaption;
    public IntPtr lpfnHook;
    public IntPtr lCustData;
    public IntPtr hInstance;
    public IntPtr lpszTemplate;
    public IntPtr hResource;
    public Guid clsid;
    public IntPtr lpszFile;
    public uint cchFile;
    public uint cClsidExclude;
    public IntPtr lpClsidExclude;
    public Guid iid;
    public uint oleRender;
    public IntPtr lpFormatEtc;
    public IntPtr lpIOleClientSite;
    public IntPtr lpIStorage;
    public IntPtr ppvObj;
    public int sc;
    public IntPtr hMetaPict;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure OLEUIINSERTOBJECTA
    Public cbStruct As UInteger
    Public dwFlags As UInteger
    Public hWndOwner As IntPtr
    Public lpszCaption As IntPtr
    Public lpfnHook As IntPtr
    Public lCustData As IntPtr
    Public hInstance As IntPtr
    Public lpszTemplate As IntPtr
    Public hResource As IntPtr
    Public clsid As Guid
    Public lpszFile As IntPtr
    Public cchFile As UInteger
    Public cClsidExclude As UInteger
    Public lpClsidExclude As IntPtr
    Public iid As Guid
    Public oleRender As UInteger
    Public lpFormatEtc As IntPtr
    Public lpIOleClientSite As IntPtr
    Public lpIStorage As IntPtr
    Public ppvObj As IntPtr
    Public sc As Integer
    Public hMetaPict As IntPtr
End Structure
import ctypes
from ctypes import wintypes

class OLEUIINSERTOBJECTA(ctypes.Structure):
    _fields_ = [
        ("cbStruct", wintypes.DWORD),
        ("dwFlags", wintypes.DWORD),
        ("hWndOwner", ctypes.c_void_p),
        ("lpszCaption", ctypes.c_void_p),
        ("lpfnHook", ctypes.c_void_p),
        ("lCustData", ctypes.c_ssize_t),
        ("hInstance", ctypes.c_void_p),
        ("lpszTemplate", ctypes.c_void_p),
        ("hResource", ctypes.c_void_p),
        ("clsid", GUID),
        ("lpszFile", ctypes.c_void_p),
        ("cchFile", wintypes.DWORD),
        ("cClsidExclude", wintypes.DWORD),
        ("lpClsidExclude", ctypes.c_void_p),
        ("iid", GUID),
        ("oleRender", wintypes.DWORD),
        ("lpFormatEtc", ctypes.c_void_p),
        ("lpIOleClientSite", ctypes.c_void_p),
        ("lpIStorage", ctypes.c_void_p),
        ("ppvObj", ctypes.c_void_p),
        ("sc", ctypes.c_int),
        ("hMetaPict", ctypes.c_void_p),
    ]
#[repr(C)]
pub struct OLEUIINSERTOBJECTA {
    pub cbStruct: u32,
    pub dwFlags: u32,
    pub hWndOwner: *mut core::ffi::c_void,
    pub lpszCaption: *mut core::ffi::c_void,
    pub lpfnHook: *mut core::ffi::c_void,
    pub lCustData: isize,
    pub hInstance: *mut core::ffi::c_void,
    pub lpszTemplate: *mut core::ffi::c_void,
    pub hResource: *mut core::ffi::c_void,
    pub clsid: GUID,
    pub lpszFile: *mut core::ffi::c_void,
    pub cchFile: u32,
    pub cClsidExclude: u32,
    pub lpClsidExclude: *mut core::ffi::c_void,
    pub iid: GUID,
    pub oleRender: u32,
    pub lpFormatEtc: *mut core::ffi::c_void,
    pub lpIOleClientSite: *mut core::ffi::c_void,
    pub lpIStorage: *mut core::ffi::c_void,
    pub ppvObj: *mut core::ffi::c_void,
    pub sc: i32,
    pub hMetaPict: *mut core::ffi::c_void,
}
import "golang.org/x/sys/windows"

type OLEUIINSERTOBJECTA struct {
	cbStruct uint32
	dwFlags uint32
	hWndOwner uintptr
	lpszCaption uintptr
	lpfnHook uintptr
	lCustData uintptr
	hInstance uintptr
	lpszTemplate uintptr
	hResource uintptr
	clsid windows.GUID
	lpszFile uintptr
	cchFile uint32
	cClsidExclude uint32
	lpClsidExclude uintptr
	iid windows.GUID
	oleRender uint32
	lpFormatEtc uintptr
	lpIOleClientSite uintptr
	lpIStorage uintptr
	ppvObj uintptr
	sc int32
	hMetaPict uintptr
}
type
  OLEUIINSERTOBJECTA = record
    cbStruct: DWORD;
    dwFlags: DWORD;
    hWndOwner: Pointer;
    lpszCaption: Pointer;
    lpfnHook: Pointer;
    lCustData: NativeInt;
    hInstance: Pointer;
    lpszTemplate: Pointer;
    hResource: Pointer;
    clsid: TGUID;
    lpszFile: Pointer;
    cchFile: DWORD;
    cClsidExclude: DWORD;
    lpClsidExclude: Pointer;
    iid: TGUID;
    oleRender: DWORD;
    lpFormatEtc: Pointer;
    lpIOleClientSite: Pointer;
    lpIStorage: Pointer;
    ppvObj: Pointer;
    sc: Integer;
    hMetaPict: Pointer;
  end;
const OLEUIINSERTOBJECTA = extern struct {
    cbStruct: u32,
    dwFlags: u32,
    hWndOwner: ?*anyopaque,
    lpszCaption: ?*anyopaque,
    lpfnHook: ?*anyopaque,
    lCustData: isize,
    hInstance: ?*anyopaque,
    lpszTemplate: ?*anyopaque,
    hResource: ?*anyopaque,
    clsid: GUID,
    lpszFile: ?*anyopaque,
    cchFile: u32,
    cClsidExclude: u32,
    lpClsidExclude: ?*anyopaque,
    iid: GUID,
    oleRender: u32,
    lpFormatEtc: ?*anyopaque,
    lpIOleClientSite: ?*anyopaque,
    lpIStorage: ?*anyopaque,
    ppvObj: ?*anyopaque,
    sc: i32,
    hMetaPict: ?*anyopaque,
};
type
  OLEUIINSERTOBJECTA {.bycopy.} = object
    cbStruct: uint32
    dwFlags: uint32
    hWndOwner: pointer
    lpszCaption: pointer
    lpfnHook: pointer
    lCustData: int
    hInstance: pointer
    lpszTemplate: pointer
    hResource: pointer
    clsid: GUID
    lpszFile: pointer
    cchFile: uint32
    cClsidExclude: uint32
    lpClsidExclude: pointer
    iid: GUID
    oleRender: uint32
    lpFormatEtc: pointer
    lpIOleClientSite: pointer
    lpIStorage: pointer
    ppvObj: pointer
    sc: int32
    hMetaPict: pointer
struct OLEUIINSERTOBJECTA
{
    uint cbStruct;
    uint dwFlags;
    void* hWndOwner;
    void* lpszCaption;
    void* lpfnHook;
    ptrdiff_t lCustData;
    void* hInstance;
    void* lpszTemplate;
    void* hResource;
    GUID clsid;
    void* lpszFile;
    uint cchFile;
    uint cClsidExclude;
    void* lpClsidExclude;
    GUID iid;
    uint oleRender;
    void* lpFormatEtc;
    void* lpIOleClientSite;
    void* lpIStorage;
    void* ppvObj;
    int sc;
    void* hMetaPict;
}

HSP用 定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; OLEUIINSERTOBJECTA サイズ: 112 バイト(x86)
dim st, 28    ; 4byte整数×28(構造体サイズ 112 / 4 切り上げ)
; cbStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; dwFlags : INSERT_OBJECT_FLAGS (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; hWndOwner : HWND (+8, 4byte)  st.2 = 値  /  値 = st.2   (lpoke/lpeek も可)
; lpszCaption : LPSTR (+12, 4byte)  st.3 = 値  /  値 = st.3   (lpoke/lpeek も可)
; lpfnHook : LPFNOLEUIHOOK (+16, 4byte)  st.4 = 値  /  値 = st.4   (lpoke/lpeek も可)
; lCustData : LPARAM (+20, 4byte)  st.5 = 値  /  値 = st.5   (lpoke/lpeek も可)
; hInstance : HINSTANCE (+24, 4byte)  st.6 = 値  /  値 = st.6   (lpoke/lpeek も可)
; lpszTemplate : LPSTR (+28, 4byte)  st.7 = 値  /  値 = st.7   (lpoke/lpeek も可)
; hResource : HRSRC (+32, 4byte)  st.8 = 値  /  値 = st.8   (lpoke/lpeek も可)
; clsid : GUID (+36, 16byte)  varptr(st)+36 を基点に操作(16byte:入れ子/配列)
; lpszFile : LPSTR (+52, 4byte)  st.13 = 値  /  値 = st.13   (lpoke/lpeek も可)
; cchFile : DWORD (+56, 4byte)  st.14 = 値  /  値 = st.14   (lpoke/lpeek も可)
; cClsidExclude : DWORD (+60, 4byte)  st.15 = 値  /  値 = st.15   (lpoke/lpeek も可)
; lpClsidExclude : GUID* (+64, 4byte)  varptr(st)+64 を基点に操作(4byte:入れ子/配列)
; iid : GUID (+68, 16byte)  varptr(st)+68 を基点に操作(16byte:入れ子/配列)
; oleRender : DWORD (+84, 4byte)  st.21 = 値  /  値 = st.21   (lpoke/lpeek も可)
; lpFormatEtc : FORMATETC* (+88, 4byte)  varptr(st)+88 を基点に操作(4byte:入れ子/配列)
; lpIOleClientSite : IOleClientSite* (+92, 4byte)  st.23 = 値  /  値 = st.23   (lpoke/lpeek も可)
; lpIStorage : IStorage* (+96, 4byte)  st.24 = 値  /  値 = st.24   (lpoke/lpeek も可)
; ppvObj : void** (+100, 4byte)  st.25 = 値  /  値 = st.25   (lpoke/lpeek も可)
; sc : INT (+104, 4byte)  st.26 = 値  /  値 = st.26   (lpoke/lpeek も可)
; hMetaPict : HGLOBAL (+108, 4byte)  st.27 = 値  /  値 = st.27   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; OLEUIINSERTOBJECTA サイズ: 176 バイト(x64)
dim st, 44    ; 4byte整数×44(構造体サイズ 176 / 4 切り上げ)
; cbStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; dwFlags : INSERT_OBJECT_FLAGS (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; hWndOwner : HWND (+8, 8byte)  qpoke st,8,値 / qpeek(st,8)  ※IronHSPのみ。3.7/3.8は lpoke st,8,下位 : lpoke st,12,上位
; lpszCaption : LPSTR (+16, 8byte)  qpoke st,16,値 / qpeek(st,16)  ※IronHSPのみ。3.7/3.8は lpoke st,16,下位 : lpoke st,20,上位
; lpfnHook : LPFNOLEUIHOOK (+24, 8byte)  qpoke st,24,値 / qpeek(st,24)  ※IronHSPのみ。3.7/3.8は lpoke st,24,下位 : lpoke st,28,上位
; lCustData : LPARAM (+32, 8byte)  qpoke st,32,値 / qpeek(st,32)  ※IronHSPのみ。3.7/3.8は lpoke st,32,下位 : lpoke st,36,上位
; hInstance : HINSTANCE (+40, 8byte)  qpoke st,40,値 / qpeek(st,40)  ※IronHSPのみ。3.7/3.8は lpoke st,40,下位 : lpoke st,44,上位
; lpszTemplate : LPSTR (+48, 8byte)  qpoke st,48,値 / qpeek(st,48)  ※IronHSPのみ。3.7/3.8は lpoke st,48,下位 : lpoke st,52,上位
; hResource : HRSRC (+56, 8byte)  qpoke st,56,値 / qpeek(st,56)  ※IronHSPのみ。3.7/3.8は lpoke st,56,下位 : lpoke st,60,上位
; clsid : GUID (+64, 16byte)  varptr(st)+64 を基点に操作(16byte:入れ子/配列)
; lpszFile : LPSTR (+80, 8byte)  qpoke st,80,値 / qpeek(st,80)  ※IronHSPのみ。3.7/3.8は lpoke st,80,下位 : lpoke st,84,上位
; cchFile : DWORD (+88, 4byte)  st.22 = 値  /  値 = st.22   (lpoke/lpeek も可)
; cClsidExclude : DWORD (+92, 4byte)  st.23 = 値  /  値 = st.23   (lpoke/lpeek も可)
; lpClsidExclude : GUID* (+96, 8byte)  varptr(st)+96 を基点に操作(8byte:入れ子/配列)
; iid : GUID (+104, 16byte)  varptr(st)+104 を基点に操作(16byte:入れ子/配列)
; oleRender : DWORD (+120, 4byte)  st.30 = 値  /  値 = st.30   (lpoke/lpeek も可)
; lpFormatEtc : FORMATETC* (+128, 8byte)  varptr(st)+128 を基点に操作(8byte:入れ子/配列)
; lpIOleClientSite : IOleClientSite* (+136, 8byte)  qpoke st,136,値 / qpeek(st,136)  ※IronHSPのみ。3.7/3.8は lpoke st,136,下位 : lpoke st,140,上位
; lpIStorage : IStorage* (+144, 8byte)  qpoke st,144,値 / qpeek(st,144)  ※IronHSPのみ。3.7/3.8は lpoke st,144,下位 : lpoke st,148,上位
; ppvObj : void** (+152, 8byte)  qpoke st,152,値 / qpeek(st,152)  ※IronHSPのみ。3.7/3.8は lpoke st,152,下位 : lpoke st,156,上位
; sc : INT (+160, 4byte)  st.40 = 値  /  値 = st.40   (lpoke/lpeek も可)
; hMetaPict : HGLOBAL (+168, 8byte)  qpoke st,168,値 / qpeek(st,168)  ※IronHSPのみ。3.7/3.8は lpoke st,168,下位 : lpoke st,172,上位
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global GUID, pack=1
    #field int Data1
    #field short Data2
    #field short Data3
    #field byte Data4 8
#endstruct

#defstruct global OLEUIINSERTOBJECTA
    #field int cbStruct
    #field int dwFlags
    #field intptr hWndOwner
    #field intptr lpszCaption
    #field intptr lpfnHook
    #field intptr lCustData
    #field intptr hInstance
    #field intptr lpszTemplate
    #field intptr hResource
    #field GUID clsid
    #field intptr lpszFile
    #field int cchFile
    #field int cClsidExclude
    #field intptr lpClsidExclude
    #field GUID iid
    #field int oleRender
    #field intptr lpFormatEtc
    #field intptr lpIOleClientSite
    #field intptr lpIStorage
    #field intptr ppvObj
    #field int sc
    #field intptr hMetaPict
#endstruct

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