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

OLEUIPASTESPECIALA

構造体
サイズx64: 136 バイト / x86: 84 バイト

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

フィールド

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

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

意味
PSF_SHOWHELP
ダイアログボックスに Help ボタンを表示します。
PSF_SELECTPASTE
ダイアログボックスの起動時に Paste ラジオボタンが選択されます。PSF_SELECTPASTEPSF_SELECTPASTELINK のどちらも指定されていない場合、これが既定値になります。また、ダイアログボックス終了時のボタンの状態も示します。IN/OUT フラグです。
PSF_SELECTPASTELINK
ダイアログボックスの起動時に PasteLink ラジオボタンが選択されます。また、ダイアログボックス終了時のボタンの状態も示します。IN/OUT フラグです。
PSF_CHECKDISPLAYASICON
ダイアログボックスの終了時に Display As Icon ラジオボタンがオンになっていたかどうかを示します。OUT フラグです。
PSF_DISABLEDISPLAYASICON
初期化時に Display As Icon チェックボックスを無効にします。
HIDECHANGEICON
ダイアログボックス内のアイコン変更ボタンを無効にするために使用します。このボタンは、既定では OLE オブジェクトを貼り付ける際にユーザーが使用できます。それ以外の場合は STAYONCLIPBOARDCHANGE を参照してください。
STAYONCLIPBOARDCHANGE
ダイアログボックスの表示中にクリップボードが変更されても、ダイアログボックスを表示したままにするようダイアログボックスに指示するために使用します。ユーザーが別のアプリケーションに切り替えて何かをコピーまたは切り取ると、既定ではダイアログボックスはキャンセル操作を実行し、ダイアログボックスが閉じられます。これは、ユーザーに提示している途中の選択肢が、実際にクリップボード上にある内容と一致しなくなるためです。
NOREFRESHDATAOBJECT
STAYONCLIPBOARDCHANGE と組み合わせて使用します (それ以外の場合は何も行いません)。STAYONCLIPBOARDCHANGE が指定されている状態でダイアログボックスの表示中にクリップボードが変更された場合、NOREFRESHDATAOBJECT は、クリップボードの新しい内容を反映するようにダイアログボックスの内容を更新しないことを示します。これは、たとえば右クリックによるドラッグアンドドロップ操作の一部として、アプリケーションがクリップボード上のもの以外の IDataObject に対して形式を選択して貼り付けダイアログボックスを使用する場合に便利です。
hWndOwnerHWND8/4+8+8ダイアログボックスを所有するウィンドウです。このメンバーは NULL にしないでください。
lpszCaptionLPSTR8/4+16+12ダイアログボックスのタイトルとして使用する文字列へのポインターです。NULL の場合、ライブラリは Paste Special を使用します。
lpfnHookLPFNOLEUIHOOK8/4+24+16ダイアログボックス宛てのメッセージを処理するフック関数へのポインターです。フック関数が処理しなかったメッセージをライブラリ内のダイアログボックスプロシージャに渡すには、フック関数は 0 を返さなければなりません。既に処理したメッセージをライブラリのダイアログボックスプロシージャが処理しないようにするには、フック関数は 0 以外の値を返さなければなりません。
lCustDataLPARAM8/4+32+20lpfnHook メンバーが指すフック関数にライブラリが渡す、アプリケーション定義のデータです。ライブラリは WM_INITDIALOG メッセージの lParam パラメーターで OLEUIPASTESPECIAL 構造体へのポインターを渡します。このポインターを使用して lCustData メンバーを取得できます。
hInstanceHINSTANCE8/4+40+24lpTemplateName メンバーで指定されたダイアログボックステンプレートを含むインスタンスです。
lpszTemplateLPSTR8/4+48+28ライブラリの Paste Special ダイアログボックステンプレートの代わりに使用する、ダイアログボックステンプレートのリソースファイル名を指定する NULL 終端文字列へのポインターです。
hResourceHRSRC8/4+56+32カスタマイズされたテンプレートのハンドルです。
lpSrcDataObjIDataObject*8/4+64+36(クリップボードから) 貼り付けるデータオブジェクトの IDataObject インターフェイスへのポインターです。このメンバーは入力時に設定します。OleUIPasteSpecial の呼び出し時に lpSrcDataObjNULL の場合、OleUIPasteSpecial はクリップボードから IDataObject へのポインターの取得を試みます。OleUIPasteSpecial が成功した場合、lpSrcDataObj で返された IDataObject を解放するのは呼び出し元の責任です。
arrPasteEntriesOLEUIPASTEENTRYA*8/4+72+40受け入れ可能な形式を指定する OLEUIPASTEENTRY 配列です。このメンバーは入力時に設定します。
cPasteEntriesINT4+80+44OLEUIPASTEENTRY 配列のエントリ数です。このメンバーは入力時に設定します。
arrLinkTypesDWORD*8/4+88+48受け入れ可能なリンクの種類の一覧です。リンクの種類は、arrPasteEntries 内で OLEUIPASTEFLAG を使用して参照されます。このメンバーは入力時に設定します。
cLinkTypesINT4+96+52リンクの種類の数です。このメンバーは入力時に設定します。
cClsidExcludeDWORD4+100+56lpClsidExclude 内の CLSID の数です。このメンバーは入力時に設定します。
lpClsidExcludeGUID*8/4+104+60貼り付け操作で使用可能なサーバーオブジェクトの一覧から除外する CLSID の配列へのポインターです。これは Paste Link には影響しないことに注意してください。アプリケーションは、自身の CLSID をこの一覧に含めることで、自分自身への埋め込みを防ぐことができます。このフィールドは入力時に設定します。
nSelectedIndexINT4+112+64ユーザーが選択した arrPasteEntries のインデックスです。このメンバーは出力時に設定されます。
fLinkBOOL4+116+68ユーザーが PastePaste Link のどちらを選択したかを示します。このメンバーは出力時に設定されます。
hMetaPictHGLOBAL8/4+120+72ユーザーが選択したアイコンとアイコンタイトルを含むメタファイルのハンドルです。このメンバーは出力時に設定されます。
sizelSIZE8+128+76ユーザーが選択した表示アスペクトがソースで表示されているアスペクトと一致する場合の、ソースで表示されているオブジェクトのサイズです。ユーザーが異なるアスペクトを選択した場合、sizel.cxsizel.cy はどちらも 0 に設定されます。ソースで表示されているオブジェクトのサイズは、fLinkFALSE の場合は ObjectDescriptor から、fLinkTRUE の場合は LinkSrcDescriptor から取得されます。このメンバーは出力時に設定されます。

公式ドキュメント

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

解説(Remarks)

メモ

oledlg.h ヘッダーは、UNICODE プリプロセッサ定数の定義に基づいて、この関数の ANSI 版と Unicode 版を自動的に選択するエイリアスとして OLEUIPASTESPECIAL を定義しています。エンコーディングに依存しないエイリアスと、エンコーディングに依存するコードを混在させると、コンパイルエラーや実行時エラーの原因となる不一致が生じる可能性があります。詳細については、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>

// SIZE  (x64 8 / x86 8 バイト)
typedef struct SIZE {
    INT cx;
    INT cy;
} SIZE;

// OLEUIPASTESPECIALA  (x64 136 / x86 84 バイト)
typedef struct OLEUIPASTESPECIALA {
    DWORD cbStruct;
    PASTE_SPECIAL_FLAGS dwFlags;
    HWND hWndOwner;
    LPSTR lpszCaption;
    LPFNOLEUIHOOK lpfnHook;
    LPARAM lCustData;
    HINSTANCE hInstance;
    LPSTR lpszTemplate;
    HRSRC hResource;
    IDataObject* lpSrcDataObj;
    OLEUIPASTEENTRYA* arrPasteEntries;
    INT cPasteEntries;
    DWORD* arrLinkTypes;
    INT cLinkTypes;
    DWORD cClsidExclude;
    GUID* lpClsidExclude;
    INT nSelectedIndex;
    BOOL fLink;
    HGLOBAL hMetaPict;
    SIZE sizel;
} OLEUIPASTESPECIALA;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct SIZE
{
    public int cx;
    public int cy;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct OLEUIPASTESPECIALA
{
    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 IntPtr lpSrcDataObj;
    public IntPtr arrPasteEntries;
    public int cPasteEntries;
    public IntPtr arrLinkTypes;
    public int cLinkTypes;
    public uint cClsidExclude;
    public IntPtr lpClsidExclude;
    public int nSelectedIndex;
    [MarshalAs(UnmanagedType.Bool)] public bool fLink;
    public IntPtr hMetaPict;
    public SIZE sizel;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure SIZE
    Public cx As Integer
    Public cy As Integer
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure OLEUIPASTESPECIALA
    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 lpSrcDataObj As IntPtr
    Public arrPasteEntries As IntPtr
    Public cPasteEntries As Integer
    Public arrLinkTypes As IntPtr
    Public cLinkTypes As Integer
    Public cClsidExclude As UInteger
    Public lpClsidExclude As IntPtr
    Public nSelectedIndex As Integer
    <MarshalAs(UnmanagedType.Bool)> Public fLink As Boolean
    Public hMetaPict As IntPtr
    Public sizel As SIZE
End Structure
import ctypes
from ctypes import wintypes

class SIZE(ctypes.Structure):
    _fields_ = [
        ("cx", ctypes.c_int),
        ("cy", ctypes.c_int),
    ]

class OLEUIPASTESPECIALA(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),
        ("lpSrcDataObj", ctypes.c_void_p),
        ("arrPasteEntries", ctypes.c_void_p),
        ("cPasteEntries", ctypes.c_int),
        ("arrLinkTypes", ctypes.c_void_p),
        ("cLinkTypes", ctypes.c_int),
        ("cClsidExclude", wintypes.DWORD),
        ("lpClsidExclude", ctypes.c_void_p),
        ("nSelectedIndex", ctypes.c_int),
        ("fLink", wintypes.BOOL),
        ("hMetaPict", ctypes.c_void_p),
        ("sizel", SIZE),
    ]
#[repr(C)]
pub struct SIZE {
    pub cx: i32,
    pub cy: i32,
}

#[repr(C)]
pub struct OLEUIPASTESPECIALA {
    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 lpSrcDataObj: *mut core::ffi::c_void,
    pub arrPasteEntries: *mut core::ffi::c_void,
    pub cPasteEntries: i32,
    pub arrLinkTypes: *mut core::ffi::c_void,
    pub cLinkTypes: i32,
    pub cClsidExclude: u32,
    pub lpClsidExclude: *mut core::ffi::c_void,
    pub nSelectedIndex: i32,
    pub fLink: i32,
    pub hMetaPict: *mut core::ffi::c_void,
    pub sizel: SIZE,
}
import "golang.org/x/sys/windows"

type SIZE struct {
	cx int32
	cy int32
}

type OLEUIPASTESPECIALA struct {
	cbStruct uint32
	dwFlags uint32
	hWndOwner uintptr
	lpszCaption uintptr
	lpfnHook uintptr
	lCustData uintptr
	hInstance uintptr
	lpszTemplate uintptr
	hResource uintptr
	lpSrcDataObj uintptr
	arrPasteEntries uintptr
	cPasteEntries int32
	arrLinkTypes uintptr
	cLinkTypes int32
	cClsidExclude uint32
	lpClsidExclude uintptr
	nSelectedIndex int32
	fLink int32
	hMetaPict uintptr
	sizel SIZE
}
type
  SIZE = record
    cx: Integer;
    cy: Integer;
  end;

  OLEUIPASTESPECIALA = record
    cbStruct: DWORD;
    dwFlags: DWORD;
    hWndOwner: Pointer;
    lpszCaption: Pointer;
    lpfnHook: Pointer;
    lCustData: NativeInt;
    hInstance: Pointer;
    lpszTemplate: Pointer;
    hResource: Pointer;
    lpSrcDataObj: Pointer;
    arrPasteEntries: Pointer;
    cPasteEntries: Integer;
    arrLinkTypes: Pointer;
    cLinkTypes: Integer;
    cClsidExclude: DWORD;
    lpClsidExclude: Pointer;
    nSelectedIndex: Integer;
    fLink: BOOL;
    hMetaPict: Pointer;
    sizel: SIZE;
  end;
const SIZE = extern struct {
    cx: i32,
    cy: i32,
};

const OLEUIPASTESPECIALA = extern struct {
    cbStruct: u32,
    dwFlags: u32,
    hWndOwner: ?*anyopaque,
    lpszCaption: ?*anyopaque,
    lpfnHook: ?*anyopaque,
    lCustData: isize,
    hInstance: ?*anyopaque,
    lpszTemplate: ?*anyopaque,
    hResource: ?*anyopaque,
    lpSrcDataObj: ?*anyopaque,
    arrPasteEntries: ?*anyopaque,
    cPasteEntries: i32,
    arrLinkTypes: ?*anyopaque,
    cLinkTypes: i32,
    cClsidExclude: u32,
    lpClsidExclude: ?*anyopaque,
    nSelectedIndex: i32,
    fLink: i32,
    hMetaPict: ?*anyopaque,
    sizel: SIZE,
};
type
  SIZE {.bycopy.} = object
    cx: int32
    cy: int32

  OLEUIPASTESPECIALA {.bycopy.} = object
    cbStruct: uint32
    dwFlags: uint32
    hWndOwner: pointer
    lpszCaption: pointer
    lpfnHook: pointer
    lCustData: int
    hInstance: pointer
    lpszTemplate: pointer
    hResource: pointer
    lpSrcDataObj: pointer
    arrPasteEntries: pointer
    cPasteEntries: int32
    arrLinkTypes: pointer
    cLinkTypes: int32
    cClsidExclude: uint32
    lpClsidExclude: pointer
    nSelectedIndex: int32
    fLink: int32
    hMetaPict: pointer
    sizel: SIZE
struct SIZE
{
    int cx;
    int cy;
}

struct OLEUIPASTESPECIALA
{
    uint cbStruct;
    uint dwFlags;
    void* hWndOwner;
    void* lpszCaption;
    void* lpfnHook;
    ptrdiff_t lCustData;
    void* hInstance;
    void* lpszTemplate;
    void* hResource;
    void* lpSrcDataObj;
    void* arrPasteEntries;
    int cPasteEntries;
    void* arrLinkTypes;
    int cLinkTypes;
    uint cClsidExclude;
    void* lpClsidExclude;
    int nSelectedIndex;
    int fLink;
    void* hMetaPict;
    SIZE sizel;
}

HSP用 定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; OLEUIPASTESPECIALA サイズ: 84 バイト(x86)
dim st, 21    ; 4byte整数×21(構造体サイズ 84 / 4 切り上げ)
; cbStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; dwFlags : PASTE_SPECIAL_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 も可)
; lpSrcDataObj : IDataObject* (+36, 4byte)  st.9 = 値  /  値 = st.9   (lpoke/lpeek も可)
; arrPasteEntries : OLEUIPASTEENTRYA* (+40, 4byte)  varptr(st)+40 を基点に操作(4byte:入れ子/配列)
; cPasteEntries : INT (+44, 4byte)  st.11 = 値  /  値 = st.11   (lpoke/lpeek も可)
; arrLinkTypes : DWORD* (+48, 4byte)  st.12 = 値  /  値 = st.12   (lpoke/lpeek も可)
; cLinkTypes : INT (+52, 4byte)  st.13 = 値  /  値 = st.13   (lpoke/lpeek も可)
; cClsidExclude : DWORD (+56, 4byte)  st.14 = 値  /  値 = st.14   (lpoke/lpeek も可)
; lpClsidExclude : GUID* (+60, 4byte)  varptr(st)+60 を基点に操作(4byte:入れ子/配列)
; nSelectedIndex : INT (+64, 4byte)  st.16 = 値  /  値 = st.16   (lpoke/lpeek も可)
; fLink : BOOL (+68, 4byte)  st.17 = 値  /  値 = st.17   (lpoke/lpeek も可)
; hMetaPict : HGLOBAL (+72, 4byte)  st.18 = 値  /  値 = st.18   (lpoke/lpeek も可)
; sizel : SIZE (+76, 8byte)  varptr(st)+76 を基点に操作(8byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; OLEUIPASTESPECIALA サイズ: 136 バイト(x64)
dim st, 34    ; 4byte整数×34(構造体サイズ 136 / 4 切り上げ)
; cbStruct : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; dwFlags : PASTE_SPECIAL_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,上位
; lpSrcDataObj : IDataObject* (+64, 8byte)  qpoke st,64,値 / qpeek(st,64)  ※IronHSPのみ。3.7/3.8は lpoke st,64,下位 : lpoke st,68,上位
; arrPasteEntries : OLEUIPASTEENTRYA* (+72, 8byte)  varptr(st)+72 を基点に操作(8byte:入れ子/配列)
; cPasteEntries : INT (+80, 4byte)  st.20 = 値  /  値 = st.20   (lpoke/lpeek も可)
; arrLinkTypes : DWORD* (+88, 8byte)  qpoke st,88,値 / qpeek(st,88)  ※IronHSPのみ。3.7/3.8は lpoke st,88,下位 : lpoke st,92,上位
; cLinkTypes : INT (+96, 4byte)  st.24 = 値  /  値 = st.24   (lpoke/lpeek も可)
; cClsidExclude : DWORD (+100, 4byte)  st.25 = 値  /  値 = st.25   (lpoke/lpeek も可)
; lpClsidExclude : GUID* (+104, 8byte)  varptr(st)+104 を基点に操作(8byte:入れ子/配列)
; nSelectedIndex : INT (+112, 4byte)  st.28 = 値  /  値 = st.28   (lpoke/lpeek も可)
; fLink : BOOL (+116, 4byte)  st.29 = 値  /  値 = st.29   (lpoke/lpeek も可)
; hMetaPict : HGLOBAL (+120, 8byte)  qpoke st,120,値 / qpeek(st,120)  ※IronHSPのみ。3.7/3.8は lpoke st,120,下位 : lpoke st,124,上位
; sizel : SIZE (+128, 8byte)  varptr(st)+128 を基点に操作(8byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global SIZE
    #field int cx
    #field int cy
#endstruct

#defstruct global OLEUIPASTESPECIALA
    #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 intptr lpSrcDataObj
    #field intptr arrPasteEntries
    #field int cPasteEntries
    #field intptr arrLinkTypes
    #field int cLinkTypes
    #field int cClsidExclude
    #field intptr lpClsidExclude
    #field int nSelectedIndex
    #field bool fLink
    #field intptr hMetaPict
    #field SIZE sizel
#endstruct

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