Win32 API 日本語リファレンス
ホームUI.Controls.Dialogs › PAGESETUPDLGA

PAGESETUPDLGA

構造体
サイズx64: 120 バイト / x86: 84 バイトパッキング1

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

フィールド

フィールドサイズx64x86説明
lStructSizeDWORD4+0+0この構造体のサイズ (バイト単位)。
hwndOwnerHWND8/4+4+4ダイアログ ボックスを所有するウィンドウへのハンドル。このメンバーには任意の有効なウィンドウ ハンドルを指定できます。ダイアログ ボックスに所有者がない場合は NULL を指定できます。
hDevModeHGLOBAL8/4+12+8DEVMODE 構造体を格納するグローバル メモリ オブジェクトへのハンドル。入力時にハンドルを指定すると、対応する DEVMODE 構造体の値がダイアログ ボックスのコントロールの初期化に使用されます。出力時には、ダイアログ ボックスは hDevMode に、ユーザーの選択内容を示す値を格納した DEVMODE 構造体へのグローバル メモリ ハンドルを設定します。ユーザーの選択内容が利用できない場合、ダイアログ ボックスは hDevModeNULL を設定します。
hDevNamesHGLOBAL8/4+20+12DEVNAMES 構造体を格納するグローバル メモリ オブジェクトへのハンドル。この構造体には、ドライバー名、プリンター名、出力ポート名を指定する 3 つの文字列が含まれます。入力時にハンドルを指定すると、対応する DEVNAMES 構造体の文字列がダイアログ ボックスのコントロールの初期化に使用されます。出力時には、ダイアログ ボックスは hDevNames に、ユーザーの選択内容を示す文字列を格納した DEVNAMES 構造体へのグローバル メモリ ハンドルを設定します。ユーザーの選択内容が利用できない場合、ダイアログ ボックスは hDevNamesNULL を設定します。
FlagsPAGESETUPDLG_FLAGS4+28+16

ページ設定 ダイアログ ボックスの初期化に使用できるビット フラグのセット。ダイアログ ボックスから戻るとき、ユーザーの入力を示すためにこれらのフラグが設定されます。このメンバーには、次の値のうち 1 つ以上を指定できます。

意味
PSD_DEFAULTMINMARGINS
0x00000000
ユーザーがページ余白に指定できる最小値を、プリンターが許容する最小余白に設定します。これが既定値です。PSD_MARGINS フラグと PSD_MINMARGINS フラグも指定されている場合、このフラグは無視されます。
PSD_DISABLEMARGINS
0x00000010
余白のコントロールを無効にし、ユーザーが余白を設定できないようにします。
PSD_DISABLEORIENTATION
0x00000100
印刷の向きのコントロールを無効にし、ユーザーがページの向きを設定できないようにします。
PSD_DISABLEPAGEPAINTING
0x00080000
ダイアログ ボックスがサンプル ページの内容を描画しないようにします。PagePaintHook フック プロシージャを有効にしている場合は、引き続きサンプル ページの内容を描画できます。
PSD_DISABLEPAPER
0x00000200
用紙のコントロールを無効にし、ユーザーが用紙サイズや給紙方法などのページ パラメーターを設定できないようにします。
PSD_DISABLEPRINTER
0x00000020
廃止されました。

Windows XP/2000: [プリンター] ボタンを無効にし、追加のプリンター設定情報を含むダイアログ ボックスをユーザーが呼び出せないようにします。

PSD_ENABLEPAGEPAINTHOOK
0x00040000
                    <b>lpfnPagePaintHook</b> メンバーで指定されたフック プロシージャを有効にします。 
PSD_ENABLEPAGESETUPHOOK
0x00002000
lpfnPageSetupHook メンバーで指定されたフック プロシージャを有効にします。
PSD_ENABLEPAGESETUPTEMPLATE
0x00008000
hInstance メンバーと lpPageSetupTemplateName メンバーが、既定のテンプレートの代わりに使用するダイアログ ボックス テンプレートを指定することを示します。
PSD_ENABLEPAGESETUPTEMPLATEHANDLE
0x00020000
hPageSetupTemplate メンバーが、事前に読み込まれたダイアログ ボックス テンプレートを含むデータ ブロックを指定することを示します。このフラグを指定すると、システムは lpPageSetupTemplateName メンバーを無視します。
PSD_INHUNDREDTHSOFMILLIMETERS
0x00000008
余白と用紙サイズの測定単位が 100 分の 1 ミリメートルであることを示します。rtMarginrtMinMarginptPaperSize の各メンバーの値は 100 分の 1 ミリメートル単位です。入力時にこのフラグを設定すると、ユーザーのロケールの既定の測定単位を上書きできます。関数から戻ると、ダイアログ ボックスは使用された単位を示すためにこのフラグを設定します。
PSD_INTHOUSANDTHSOFINCHES
0x00000004
余白と用紙サイズの測定単位が 1000 分の 1 インチであることを示します。rtMarginrtMinMarginptPaperSize の各メンバーの値は 1000 分の 1 インチ単位です。入力時にこのフラグを設定すると、ユーザーのロケールの既定の測定単位を上書きできます。関数から戻ると、ダイアログ ボックスは使用された単位を示すためにこのフラグを設定します。
PSD_INWININIINTLMEASURE
0x00000000
予約済みです。
PSD_MARGINS
0x00000002
rtMargin メンバーで指定された値を、左、上、右、下の余白の初期幅としてシステムに使用させます。PSD_MARGINS が設定されていない場合、システムはすべての余白の初期幅を 1 インチに設定します。
PSD_MINMARGINS
0x00000001
rtMinMargin メンバーで指定された値を、左、上、右、下の余白として許容される最小幅としてシステムに使用させます。システムは、指定された最小値より小さい幅をユーザーが入力できないようにします。PSD_MINMARGINS が指定されていない場合、システムは許容される最小幅をプリンターが許容する値に設定します。
PSD_NONETWORKBUTTON
0x00200000
[ネットワーク] ボタンを非表示にして無効にします。
PSD_NOWARNING
0x00000080
既定のプリンターがない場合に、システムが警告メッセージを表示しないようにします。
PSD_RETURNDEFAULT
0x00000400

PageSetupDlg はダイアログ ボックスを表示しません。代わりに、hDevNames メンバーと hDevMode メンバーに、システムの既定のプリンター用に初期化された DEVMODE 構造体と DEVNAMES 構造体へのハンドルを設定します。hDevNames または hDevMode のいずれかが NULL でない場合、PageSetupDlg はエラーを返します。

PSD_SHOWHELP
0x00000800
ダイアログ ボックスに [ヘルプ] ボタンを表示します。hwndOwner メンバーには、ユーザーが [ヘルプ] ボタンをクリックしたときにダイアログ ボックスが送信する HELPMSGSTRING 登録メッセージを受け取るウィンドウを指定する必要があります。
ptPaperSizePOINT8+32+20ユーザーが選択した用紙のサイズ。測定単位は PSD_INTHOUSANDTHSOFINCHES または PSD_INHUNDREDTHSOFMILLIMETERS フラグで示されます。
rtMinMarginRECT16+40+28左、上、右、下の余白として許容される最小幅。PSD_MINMARGINS フラグが設定されていない場合、システムはこのメンバーを無視します。これらの値は、rtMargin メンバーで指定された値以下でなければなりません。測定単位は PSD_INTHOUSANDTHSOFINCHES または PSD_INHUNDREDTHSOFMILLIMETERS フラグで示されます。
rtMarginRECT16+56+44左、上、右、下の余白の幅。PSD_MARGINS フラグを設定した場合、rtMargin は余白の初期値を指定します。PageSetupDlg から戻ると、rtMargin にはユーザーが選択した余白の幅が格納されます。測定単位は PSD_INHUNDREDTHSOFMILLIMETERS または PSD_INTHOUSANDTHSOFINCHES フラグで示されます。
hInstanceHINSTANCE8/4+72+60Flags メンバーに PSD_ENABLEPAGESETUPTEMPLATE フラグが設定されている場合、hInstancelpPageSetupTemplateName メンバーで指定されたダイアログ ボックス テンプレートを含むアプリケーションまたはモジュールのインスタンスへのハンドルです。
lCustDataLPARAM8/4+80+64lpfnPageSetupHook メンバーで指定されたフック プロシージャにシステムが渡す、アプリケーション定義のデータ。システムがフック プロシージャに WM_INITDIALOG メッセージを送信するとき、メッセージの lParam パラメーターは、ダイアログ ボックスの作成時に指定された PAGESETUPDLG 構造体へのポインターです。フック プロシージャはこのポインターを使用して lCustData の値を取得できます。
lpfnPageSetupHookLPPAGESETUPHOOK8/4+88+68ダイアログ ボックス宛てのメッセージを処理できる PageSetupHook フック プロシージャへのポインター。Flags メンバーに PSD_ENABLEPAGESETUPHOOK フラグが設定されていない限り、このメンバーは無視されます。
lpfnPagePaintHookLPPAGEPAINTHOOK8/4+96+72サンプル ページが再描画されるたびにダイアログ ボックスから WM_PSD_* メッセージを受け取る PagePaintHook フック プロシージャへのポインター。これらのメッセージを処理することで、フック プロシージャはサンプル ページの外観をカスタマイズできます。Flags メンバーに PSD_ENABLEPAGEPAINTHOOK フラグが設定されていない限り、このメンバーは無視されます。
lpPageSetupTemplateNameLPSTR8/4+104+76hInstance メンバーで指定されたモジュール内にあるダイアログ ボックス テンプレート リソースの名前。このテンプレートは、標準のダイアログ ボックス テンプレートの代わりに使用されます。番号付きのダイアログ ボックス リソースの場合、lpPageSetupTemplateName には MAKEINTRESOURCE マクロが返す値を指定できます。Flags メンバーに PSD_ENABLEPAGESETUPTEMPLATE フラグが設定されていない限り、このメンバーは無視されます。
hPageSetupTemplateHGLOBAL8/4+112+80Flags メンバーに PSD_ENABLEPAGESETUPTEMPLATEHANDLE フラグが設定されている場合、hPageSetupTemplate はダイアログ ボックス テンプレートを含むメモリ オブジェクトへのハンドルです。

公式ドキュメント

PageSetupDlg 関数が ページ設定 ダイアログ ボックスを初期化するために使用する情報を格納します。ユーザーがダイアログ ボックスを閉じた後、システムはユーザーが定義したページ パラメーターに関する情報をこの構造体に返します。

解説(Remarks)

PSD_INHUNDREDTHSOFMILLIMETERS フラグと PSD_INTHOUSANDTHSOFINCHES フラグのどちらも指定されていない場合、システムは既定のユーザー ロケールの LOCALE_IMEASURE の値を照会して、余白の幅と用紙サイズの測定単位 (100 分の 1 ミリメートルまたは 1000 分の 1 インチ) を決定します。

hDevNameshDevMode の両方が有効なハンドルを保持しており、 DEVNAMES 構造体の wDeviceOffset メンバーで指定されたプリンター名が DEVMODE 構造体の dmDeviceName メンバーで指定された名前と異なる場合、システムは既定で wDeviceOffset で指定された名前を使用します。

メモ

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

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

各言語での定義

#include <windows.h>

// POINT  (x64 8 / x86 8 バイト)
typedef struct POINT {
    INT x;
    INT y;
} POINT;

// RECT  (x64 16 / x86 16 バイト)
typedef struct RECT {
    INT left;
    INT top;
    INT right;
    INT bottom;
} RECT;

// PAGESETUPDLGA  (x64 120 / x86 84 バイト)
#pragma pack(push, 1)
typedef struct PAGESETUPDLGA {
    DWORD lStructSize;
    HWND hwndOwner;
    HGLOBAL hDevMode;
    HGLOBAL hDevNames;
    PAGESETUPDLG_FLAGS Flags;
    POINT ptPaperSize;
    RECT rtMinMargin;
    RECT rtMargin;
    HINSTANCE hInstance;
    LPARAM lCustData;
    LPPAGESETUPHOOK lpfnPageSetupHook;
    LPPAGEPAINTHOOK lpfnPagePaintHook;
    LPSTR lpPageSetupTemplateName;
    HGLOBAL hPageSetupTemplate;
} PAGESETUPDLGA;
#pragma pack(pop)
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct POINT
{
    public int x;
    public int y;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct RECT
{
    public int left;
    public int top;
    public int right;
    public int bottom;
}

[StructLayout(LayoutKind.Sequential, Pack = 1, CharSet = CharSet.Unicode)]
public struct PAGESETUPDLGA
{
    public uint lStructSize;
    public IntPtr hwndOwner;
    public IntPtr hDevMode;
    public IntPtr hDevNames;
    public uint Flags;
    public POINT ptPaperSize;
    public RECT rtMinMargin;
    public RECT rtMargin;
    public IntPtr hInstance;
    public IntPtr lCustData;
    public IntPtr lpfnPageSetupHook;
    public IntPtr lpfnPagePaintHook;
    public IntPtr lpPageSetupTemplateName;
    public IntPtr hPageSetupTemplate;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure POINT
    Public x As Integer
    Public y As Integer
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure RECT
    Public left As Integer
    Public top As Integer
    Public right As Integer
    Public bottom As Integer
End Structure

<StructLayout(LayoutKind.Sequential, Pack:=1, CharSet:=CharSet.Unicode)>
Public Structure PAGESETUPDLGA
    Public lStructSize As UInteger
    Public hwndOwner As IntPtr
    Public hDevMode As IntPtr
    Public hDevNames As IntPtr
    Public Flags As UInteger
    Public ptPaperSize As POINT
    Public rtMinMargin As RECT
    Public rtMargin As RECT
    Public hInstance As IntPtr
    Public lCustData As IntPtr
    Public lpfnPageSetupHook As IntPtr
    Public lpfnPagePaintHook As IntPtr
    Public lpPageSetupTemplateName As IntPtr
    Public hPageSetupTemplate As IntPtr
End Structure
import ctypes
from ctypes import wintypes

class POINT(ctypes.Structure):
    _fields_ = [
        ("x", ctypes.c_int),
        ("y", ctypes.c_int),
    ]

class RECT(ctypes.Structure):
    _fields_ = [
        ("left", ctypes.c_int),
        ("top", ctypes.c_int),
        ("right", ctypes.c_int),
        ("bottom", ctypes.c_int),
    ]

class PAGESETUPDLGA(ctypes.Structure):
    _pack_ = 1
    _fields_ = [
        ("lStructSize", wintypes.DWORD),
        ("hwndOwner", ctypes.c_void_p),
        ("hDevMode", ctypes.c_void_p),
        ("hDevNames", ctypes.c_void_p),
        ("Flags", wintypes.DWORD),
        ("ptPaperSize", POINT),
        ("rtMinMargin", RECT),
        ("rtMargin", RECT),
        ("hInstance", ctypes.c_void_p),
        ("lCustData", ctypes.c_ssize_t),
        ("lpfnPageSetupHook", ctypes.c_void_p),
        ("lpfnPagePaintHook", ctypes.c_void_p),
        ("lpPageSetupTemplateName", ctypes.c_void_p),
        ("hPageSetupTemplate", ctypes.c_void_p),
    ]
#[repr(C)]
pub struct POINT {
    pub x: i32,
    pub y: i32,
}

#[repr(C)]
pub struct RECT {
    pub left: i32,
    pub top: i32,
    pub right: i32,
    pub bottom: i32,
}

#[repr(C, packed(1))]
pub struct PAGESETUPDLGA {
    pub lStructSize: u32,
    pub hwndOwner: *mut core::ffi::c_void,
    pub hDevMode: *mut core::ffi::c_void,
    pub hDevNames: *mut core::ffi::c_void,
    pub Flags: u32,
    pub ptPaperSize: POINT,
    pub rtMinMargin: RECT,
    pub rtMargin: RECT,
    pub hInstance: *mut core::ffi::c_void,
    pub lCustData: isize,
    pub lpfnPageSetupHook: *mut core::ffi::c_void,
    pub lpfnPagePaintHook: *mut core::ffi::c_void,
    pub lpPageSetupTemplateName: *mut core::ffi::c_void,
    pub hPageSetupTemplate: *mut core::ffi::c_void,
}
import "golang.org/x/sys/windows"

type POINT struct {
	x int32
	y int32
}

type RECT struct {
	left int32
	top int32
	right int32
	bottom int32
}

type PAGESETUPDLGA struct {
	lStructSize uint32
	hwndOwner uintptr
	hDevMode uintptr
	hDevNames uintptr
	Flags uint32
	ptPaperSize POINT
	rtMinMargin RECT
	rtMargin RECT
	hInstance uintptr
	lCustData uintptr
	lpfnPageSetupHook uintptr
	lpfnPagePaintHook uintptr
	lpPageSetupTemplateName uintptr
	hPageSetupTemplate uintptr
}
type
  POINT = record
    x: Integer;
    y: Integer;
  end;

  RECT = record
    left: Integer;
    top: Integer;
    right: Integer;
    bottom: Integer;
  end;

  PAGESETUPDLGA = packed record
    lStructSize: DWORD;
    hwndOwner: Pointer;
    hDevMode: Pointer;
    hDevNames: Pointer;
    Flags: DWORD;
    ptPaperSize: POINT;
    rtMinMargin: RECT;
    rtMargin: RECT;
    hInstance: Pointer;
    lCustData: NativeInt;
    lpfnPageSetupHook: Pointer;
    lpfnPagePaintHook: Pointer;
    lpPageSetupTemplateName: Pointer;
    hPageSetupTemplate: Pointer;
  end;
const POINT = extern struct {
    x: i32,
    y: i32,
};

const RECT = extern struct {
    left: i32,
    top: i32,
    right: i32,
    bottom: i32,
};

const PAGESETUPDLGA = extern struct {
    lStructSize: u32,
    hwndOwner: ?*anyopaque,
    hDevMode: ?*anyopaque,
    hDevNames: ?*anyopaque,
    Flags: u32,
    ptPaperSize: POINT,
    rtMinMargin: RECT,
    rtMargin: RECT,
    hInstance: ?*anyopaque,
    lCustData: isize,
    lpfnPageSetupHook: ?*anyopaque,
    lpfnPagePaintHook: ?*anyopaque,
    lpPageSetupTemplateName: ?*anyopaque,
    hPageSetupTemplate: ?*anyopaque,
};
type
  POINT {.bycopy.} = object
    x: int32
    y: int32

  RECT {.bycopy.} = object
    left: int32
    top: int32
    right: int32
    bottom: int32

  PAGESETUPDLGA {.packed.} = object
    lStructSize: uint32
    hwndOwner: pointer
    hDevMode: pointer
    hDevNames: pointer
    Flags: uint32
    ptPaperSize: POINT
    rtMinMargin: RECT
    rtMargin: RECT
    hInstance: pointer
    lCustData: int
    lpfnPageSetupHook: pointer
    lpfnPagePaintHook: pointer
    lpPageSetupTemplateName: pointer
    hPageSetupTemplate: pointer
struct POINT
{
    int x;
    int y;
}

struct RECT
{
    int left;
    int top;
    int right;
    int bottom;
}

align(1)
struct PAGESETUPDLGA
{
    uint lStructSize;
    void* hwndOwner;
    void* hDevMode;
    void* hDevNames;
    uint Flags;
    POINT ptPaperSize;
    RECT rtMinMargin;
    RECT rtMargin;
    void* hInstance;
    ptrdiff_t lCustData;
    void* lpfnPageSetupHook;
    void* lpfnPagePaintHook;
    void* lpPageSetupTemplateName;
    void* hPageSetupTemplate;
}

HSP用 定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; PAGESETUPDLGA サイズ: 84 バイト(x86)
dim st, 21    ; 4byte整数×21(構造体サイズ 84 / 4 切り上げ)
; lStructSize : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; hwndOwner : HWND (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; hDevMode : HGLOBAL (+8, 4byte)  st.2 = 値  /  値 = st.2   (lpoke/lpeek も可)
; hDevNames : HGLOBAL (+12, 4byte)  st.3 = 値  /  値 = st.3   (lpoke/lpeek も可)
; Flags : PAGESETUPDLG_FLAGS (+16, 4byte)  st.4 = 値  /  値 = st.4   (lpoke/lpeek も可)
; ptPaperSize : POINT (+20, 8byte)  varptr(st)+20 を基点に操作(8byte:入れ子/配列)
; rtMinMargin : RECT (+28, 16byte)  varptr(st)+28 を基点に操作(16byte:入れ子/配列)
; rtMargin : RECT (+44, 16byte)  varptr(st)+44 を基点に操作(16byte:入れ子/配列)
; hInstance : HINSTANCE (+60, 4byte)  st.15 = 値  /  値 = st.15   (lpoke/lpeek も可)
; lCustData : LPARAM (+64, 4byte)  st.16 = 値  /  値 = st.16   (lpoke/lpeek も可)
; lpfnPageSetupHook : LPPAGESETUPHOOK (+68, 4byte)  st.17 = 値  /  値 = st.17   (lpoke/lpeek も可)
; lpfnPagePaintHook : LPPAGEPAINTHOOK (+72, 4byte)  st.18 = 値  /  値 = st.18   (lpoke/lpeek も可)
; lpPageSetupTemplateName : LPSTR (+76, 4byte)  st.19 = 値  /  値 = st.19   (lpoke/lpeek も可)
; hPageSetupTemplate : HGLOBAL (+80, 4byte)  st.20 = 値  /  値 = st.20   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; PAGESETUPDLGA サイズ: 120 バイト(x64)
dim st, 30    ; 4byte整数×30(構造体サイズ 120 / 4 切り上げ)
; lStructSize : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; hwndOwner : HWND (+4, 8byte)  qpoke st,4,値 / qpeek(st,4)  ※IronHSPのみ。3.7/3.8は lpoke st,4,下位 : lpoke st,8,上位
; hDevMode : HGLOBAL (+12, 8byte)  qpoke st,12,値 / qpeek(st,12)  ※IronHSPのみ。3.7/3.8は lpoke st,12,下位 : lpoke st,16,上位
; hDevNames : HGLOBAL (+20, 8byte)  qpoke st,20,値 / qpeek(st,20)  ※IronHSPのみ。3.7/3.8は lpoke st,20,下位 : lpoke st,24,上位
; Flags : PAGESETUPDLG_FLAGS (+28, 4byte)  st.7 = 値  /  値 = st.7   (lpoke/lpeek も可)
; ptPaperSize : POINT (+32, 8byte)  varptr(st)+32 を基点に操作(8byte:入れ子/配列)
; rtMinMargin : RECT (+40, 16byte)  varptr(st)+40 を基点に操作(16byte:入れ子/配列)
; rtMargin : RECT (+56, 16byte)  varptr(st)+56 を基点に操作(16byte:入れ子/配列)
; hInstance : HINSTANCE (+72, 8byte)  qpoke st,72,値 / qpeek(st,72)  ※IronHSPのみ。3.7/3.8は lpoke st,72,下位 : lpoke st,76,上位
; lCustData : LPARAM (+80, 8byte)  qpoke st,80,値 / qpeek(st,80)  ※IronHSPのみ。3.7/3.8は lpoke st,80,下位 : lpoke st,84,上位
; lpfnPageSetupHook : LPPAGESETUPHOOK (+88, 8byte)  qpoke st,88,値 / qpeek(st,88)  ※IronHSPのみ。3.7/3.8は lpoke st,88,下位 : lpoke st,92,上位
; lpfnPagePaintHook : LPPAGEPAINTHOOK (+96, 8byte)  qpoke st,96,値 / qpeek(st,96)  ※IronHSPのみ。3.7/3.8は lpoke st,96,下位 : lpoke st,100,上位
; lpPageSetupTemplateName : LPSTR (+104, 8byte)  qpoke st,104,値 / qpeek(st,104)  ※IronHSPのみ。3.7/3.8は lpoke st,104,下位 : lpoke st,108,上位
; hPageSetupTemplate : HGLOBAL (+112, 8byte)  qpoke st,112,値 / qpeek(st,112)  ※IronHSPのみ。3.7/3.8は lpoke st,112,下位 : lpoke st,116,上位
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global POINT
    #field int x
    #field int y
#endstruct

#defstruct global RECT
    #field int left
    #field int top
    #field int right
    #field int bottom
#endstruct

#defstruct global PAGESETUPDLGA, pack=1
    #field int lStructSize
    #field intptr hwndOwner
    #field intptr hDevMode
    #field intptr hDevNames
    #field int Flags
    #field POINT ptPaperSize
    #field RECT rtMinMargin
    #field RECT rtMargin
    #field intptr hInstance
    #field intptr lCustData
    #field intptr lpfnPageSetupHook
    #field intptr lpfnPagePaintHook
    #field intptr lpPageSetupTemplateName
    #field intptr hPageSetupTemplate
#endstruct

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