Win32 API 日本語リファレンス
ホームDevices.Display › DEVINFO

DEVINFO

構造体
サイズx64: 312 バイト / x86: 300 バイト

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

フィールド

フィールドサイズx64x86説明
flGraphicsCapsDWORD4+0+0

グラフィックス ドライバーやそのハードウェアのグラフィックス機能を示すフラグのセットです。これらのフラグは次の表のとおり定義されています。

フラグ 定義
GCAPS_ALTERNATEFILL 交互 (alternate) モードの塗りつぶしを処理します。
GCAPS_ARBRUSHOPAQUE テキストの不透明矩形 (背景色) に任意のブラシを使用できます。
GCAPS_ARBRUSHTEXT テキストの前景色に任意のブラシを使用できます。
GCAPS_ASYNCCHANGE このフラグは廃止されています。従来のドライバーでは、デバイス上で他の描画が行われている間に、ドライバーがハードウェアでポインターの形状を変更できることを示していました。
GCAPS_ASYNCMOVE デバイス上で他の描画が行われている間に、ドライバーがハードウェアでポインターを移動できます。
GCAPS_BEZIERS ベジエ曲線を処理します。
GCAPS_CMYKCOLOR ドライバーは CYMK 色空間をサポートします。
GCAPS_COLOR_DITHER PDEV 互換のサーフェスへのカラー ディザリングを処理します。
GCAPS_DIRECTDRAW このフラグは廃止されています。
GCAPS_DITHERONREALIZE GDI が、ディザリング対象の RGB を直接指定して DrvRealizeBrush を呼び出せることを指定します。
GCAPS_DONTJOURNAL このプリンター ドライバーへのメタファイル印刷を禁止します。これはプリンター DC でのみ有効であり、通常は印刷時にアプリケーションへ制御が戻るまでの時間が長くなります。
GCAPS_FONT_RASTERIZER デバイスのハードウェアが TrueType フォントをラスタライズできます。
GCAPS_FORCEDITHER すべてのジオメトリック ペンでディザリングを許可します。
GCAPS_GEOMETRICWIDE ジオメトリックな線幅の拡張 (ワイドニング) を処理します。
GCAPS_GRAY16 アンチエイリアス処理されたテキストをネイティブに処理します。
GCAPS_HALFTONE ハーフトーン処理を行います。
GCAPS_HIGHRESTEXT このフラグは廃止されています。従来のドライバーでは、STROBJ が返すグリフ位置を FIX 点座標で要求することを示していました。
GCAPS_HORIZSTRIKE このフラグは廃止されています。従来のドライバーでは、ドライバーが DrvTextOut で水平方向の取り消し線を処理することを示していました。
GCAPS_ICM カラー マネージメント操作をドライバーまたはプリンター ハードウェアで実行できることを示します。
GCAPS_LAYERED これがリモート処理用のレイヤー ドライバーまたは ミラー ドライバー であることを示します。プリンター ドライバーはレイヤー ドライバーになることはできません。
GCAPS_MONO_DITHER モノクロ ディザリングを処理します。
GCAPS_NO64BITMEMACCESS このフラグは廃止されています。
GCAPS_NUP 「N-up」印刷 (割り付け印刷) がサポートされることを示します。
GCAPS_OPAQUERECT DrvTextOut で不透明矩形を処理します。
GCAPS_PALMANAGED パレット管理をサポートします。
GCAPS_PANNING GDI がポインターをシミュレートしている場合、GDI は DrvMovePointer を呼び出して現在のカーソル位置をドライバーに通知します。これにより、ドライバーは仮想ディスプレイのパンニングを処理できます。
GCAPS_SCREENPRECISION 完全に一致するフォントが存在しない場合、ラスタライザー (フォント エンジン) はデバイス フォントよりもスクリーン (ソフト) フォントを優先して選択します。
GCAPS_VECTORFONT DrvTextOut でベクター フォントのストローク描画を処理します。
GCAPS_VERTSTRIKE このフラグは廃止されています。従来のドライバーでは、ドライバーが DrvTextOut で垂直方向の取り消し線を処理することを示していました。
GCAPS_WINDINGFILL ワインディング モードの塗りつぶしを処理します。詳細については「Path Fill Modes」を参照してください。
GCAPS2_REMOTEDRIVER ディスプレイ ドライバーがリモート ユーザー セッションのサポートに使用されることを示します。
lfDefaultFontLOGFONTW92+4+4デバイスの既定のフォントを指定する拡張論理フォント構造体です。この構造体の詳細については、Microsoft Windows SDK のドキュメントの EXTLOGFONT を参照してください。
lfAnsiVarFontLOGFONTW92+96+96デバイスの既定の可変ピッチ フォントを指定する拡張論理フォント構造体です。この構造体の詳細については、Windows SDK のドキュメントの EXTLOGFONT を参照してください。
lfAnsiFixFontLOGFONTW92+188+188デバイスの既定の固定ピッチ (等幅) フォントを指定する拡張論理フォント構造体です。この構造体の詳細については、Windows SDK のドキュメントの EXTLOGFONT を参照してください。
cFontsDWORD4+280+280デバイス フォントの数を指定します。GDI は、デバイスが自身のサーフェス上でこの数のフォントを使用してテキストを描画でき、かつドライバーがそれらのフォントのメトリック情報を提供できるものと想定します。ドライバーが cFonts に -1 を設定した場合、GDI はフォントが必要になるまで待ってから、DrvQueryFont の呼び出しによって、ドライバーが実際にサポートするフォント数を照会します。
iDitherFormatDWORD4+284+284

ビットマップの形式を指定します。このパラメーターは 1 ピクセルあたり何ビットの色情報が要求されるかを示し、次のいずれかの値でなければなりません。

意味
BMF_1BPP モノクロ
BMF_4BPP 1 ピクセルあたり 4 ビット
BMF_8BPP 1 ピクセルあたり 8 ビット
BMF_16BPP 1 ピクセルあたり 16 ビット
BMF_24BPP 1 ピクセルあたり 24 ビット
BMF_32BPP 1 ピクセルあたり 32 ビット
BMF_4RLE 1 ピクセルあたり 4 ビット、ランレングス エンコード
BMF_8RLE 1 ピクセルあたり 8 ビット、ランレングス エンコード
BMF_JPEG JPEG 圧縮イメージ
BMF_PNG PNG 圧縮イメージ
cxDitherWORD2+288+288ディザリングパターンの幅(ピクセル)。
cyDitherWORD2+290+290ディザリングされたブラシの寸法を指定します。これらのメンバーが 0 以外の場合、デバイスは指定された RGB 色に対してディザリングされたブラシを作成できます。
hpalDefaultHPALETTE8/4+296+292デバイスの既定のパレットへのハンドルです。ドライバーは EngCreatePalette を呼び出してパレットを作成する必要があります。ドライバーはこのハンドルを GDI に返すことで、パレットをデバイスに関連付けます。
flGraphicsCaps2DWORD4+304+296

デバイス ドライバーの追加のグラフィックス機能を示すフラグのセットです。これらのフラグは次の表のとおり定義されています。

フラグ 定義
GCAPS2_ALPHACURSOR ピクセルごとのアルファ値を持つポインターを処理します。
GCAPS2_CHANGEGAMMARAMP ディスプレイ デバイスは、ロード可能なハードウェア ガンマ ランプ を備えています。
GCAPS2_EXCLUDELAYERED これがアクセシビリティ ミラー ドライバーであることを示します。このフラグを設定しないミラー ドライバーは、レイヤード HWND の描画プリミティブを引き続き受け取ります。詳細については「Mirror Drivers」を参照してください。
GCAPS2_ICD_MULTIMON マルチモニター環境において、操作対象の矩形が他のデバイスとも交差する場合でも、ドライバーが DrvSetPixelFormatDrvDescribePixelFormatDrvSwapBuffers の各呼び出しを処理する意思があることを GDI に通知します。これらの呼び出しを処理する機会が与えられるのは、常に 1 つのデバイスだけです。この機能が指定されておらず、対象の領域が複数のデバイスと交差する場合は、どのドライバーも呼び出されません。
GCAPS2_INCLUDEAPIBITMAPS デバイス非依存ビットマップ (DIB) に対して描画呼び出しが行われたときに、アクセシビリティ ミラー ドライバーが呼び出されます。詳細については「Mirror Drivers」を参照してください。
GCAPS2_JPEGSRC デバイスは JPEG 圧縮イメージ (つまり、SURFOBJ 構造体で BMF_JPEG が設定されたイメージ) を受け取ることができます。
GCAPS2_MOUSETRAILS ドライバーがマウス トレイル (短時間のマウスの位置を示す連続したカーソル イメージ) をサポートすることを示します。ドライバーは、DrvSetPointerShape 関数の fl パラメーターで GDI が渡す値を処理できます。ドライバーは SPS_LENGTHMASK および SPS_FREQMASK マスクを使用して、マウス トレイルの長さと頻度の値を取得します。これらのマスクの詳細については DrvSetPointerShape を参照してください。
GCAPS2_PNGSRC デバイスは PNG 圧縮イメージ (つまり、SURFOBJ 構造体で BMF_PNG が設定されたイメージ) を受け取ることができます。
GCAPS2_SYNCFLUSH ドライバーは、バッチ処理されたグラフィックス DDI 呼び出しに対して、プログラムによるフラッシュ機構をサポートします。ドライバーがバッチ処理している描画を GDI がフラッシュする必要があるときは、常に DrvSynchronizeSurface が呼び出されます。
GCAPS2_SYNCTIMER ドライバーは、バッチ処理されたグラフィックス DDI 呼び出しに対して、タイマーベースのフラッシュ機構をサポートします。DrvSynchronizeSurface は、GDI が決定するタイマー間隔に基づいて定期的に呼び出されます。

公式ドキュメント

DEVINFO 構造体は、ドライバーとそのプライベート PDEV に関する情報をグラフィックス エンジンに提供します。

解説(Remarks)

ドライバーの DrvEnablePDEV 関数が DEVINFO 構造体に値を設定します。ドライバーは自身に関係するメンバーのみを設定してください。この構造体は、DrvEnablePDEV が呼び出される前に GDI によって 0 で初期化されます。アプリケーションがこの構造体に直接アクセスすることはできません。

ドライバーが flGraphicsCaps2GCAPS2_JPEGSRC または GCAPS2_PNGSRC を設定する場合、次の規則が適用されます。

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

各言語での定義

#include <windows.h>

// LOGFONTW  (x64 92 / x86 92 バイト)
typedef struct LOGFONTW {
    INT lfHeight;
    INT lfWidth;
    INT lfEscapement;
    INT lfOrientation;
    INT lfWeight;
    BYTE lfItalic;
    BYTE lfUnderline;
    BYTE lfStrikeOut;
    FONT_CHARSET lfCharSet;
    FONT_OUTPUT_PRECISION lfOutPrecision;
    FONT_CLIP_PRECISION lfClipPrecision;
    FONT_QUALITY lfQuality;
    BYTE lfPitchAndFamily;
    WCHAR lfFaceName[32];
} LOGFONTW;

// DEVINFO  (x64 312 / x86 300 バイト)
typedef struct DEVINFO {
    DWORD flGraphicsCaps;
    LOGFONTW lfDefaultFont;
    LOGFONTW lfAnsiVarFont;
    LOGFONTW lfAnsiFixFont;
    DWORD cFonts;
    DWORD iDitherFormat;
    WORD cxDither;
    WORD cyDither;
    HPALETTE hpalDefault;
    DWORD flGraphicsCaps2;
} DEVINFO;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct LOGFONTW
{
    public int lfHeight;
    public int lfWidth;
    public int lfEscapement;
    public int lfOrientation;
    public int lfWeight;
    public byte lfItalic;
    public byte lfUnderline;
    public byte lfStrikeOut;
    public byte lfCharSet;
    public byte lfOutPrecision;
    public byte lfClipPrecision;
    public byte lfQuality;
    public byte lfPitchAndFamily;
    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 32)] public string lfFaceName;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DEVINFO
{
    public uint flGraphicsCaps;
    public LOGFONTW lfDefaultFont;
    public LOGFONTW lfAnsiVarFont;
    public LOGFONTW lfAnsiFixFont;
    public uint cFonts;
    public uint iDitherFormat;
    public ushort cxDither;
    public ushort cyDither;
    public IntPtr hpalDefault;
    public uint flGraphicsCaps2;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure LOGFONTW
    Public lfHeight As Integer
    Public lfWidth As Integer
    Public lfEscapement As Integer
    Public lfOrientation As Integer
    Public lfWeight As Integer
    Public lfItalic As Byte
    Public lfUnderline As Byte
    Public lfStrikeOut As Byte
    Public lfCharSet As Byte
    Public lfOutPrecision As Byte
    Public lfClipPrecision As Byte
    Public lfQuality As Byte
    Public lfPitchAndFamily As Byte
    <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=32)> Public lfFaceName As String
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DEVINFO
    Public flGraphicsCaps As UInteger
    Public lfDefaultFont As LOGFONTW
    Public lfAnsiVarFont As LOGFONTW
    Public lfAnsiFixFont As LOGFONTW
    Public cFonts As UInteger
    Public iDitherFormat As UInteger
    Public cxDither As UShort
    Public cyDither As UShort
    Public hpalDefault As IntPtr
    Public flGraphicsCaps2 As UInteger
End Structure
import ctypes
from ctypes import wintypes

class LOGFONTW(ctypes.Structure):
    _fields_ = [
        ("lfHeight", ctypes.c_int),
        ("lfWidth", ctypes.c_int),
        ("lfEscapement", ctypes.c_int),
        ("lfOrientation", ctypes.c_int),
        ("lfWeight", ctypes.c_int),
        ("lfItalic", ctypes.c_ubyte),
        ("lfUnderline", ctypes.c_ubyte),
        ("lfStrikeOut", ctypes.c_ubyte),
        ("lfCharSet", ctypes.c_ubyte),
        ("lfOutPrecision", ctypes.c_ubyte),
        ("lfClipPrecision", ctypes.c_ubyte),
        ("lfQuality", ctypes.c_ubyte),
        ("lfPitchAndFamily", ctypes.c_ubyte),
        ("lfFaceName", ctypes.c_wchar * 32),
    ]

class DEVINFO(ctypes.Structure):
    _fields_ = [
        ("flGraphicsCaps", wintypes.DWORD),
        ("lfDefaultFont", LOGFONTW),
        ("lfAnsiVarFont", LOGFONTW),
        ("lfAnsiFixFont", LOGFONTW),
        ("cFonts", wintypes.DWORD),
        ("iDitherFormat", wintypes.DWORD),
        ("cxDither", ctypes.c_ushort),
        ("cyDither", ctypes.c_ushort),
        ("hpalDefault", ctypes.c_void_p),
        ("flGraphicsCaps2", wintypes.DWORD),
    ]
#[repr(C)]
pub struct LOGFONTW {
    pub lfHeight: i32,
    pub lfWidth: i32,
    pub lfEscapement: i32,
    pub lfOrientation: i32,
    pub lfWeight: i32,
    pub lfItalic: u8,
    pub lfUnderline: u8,
    pub lfStrikeOut: u8,
    pub lfCharSet: u8,
    pub lfOutPrecision: u8,
    pub lfClipPrecision: u8,
    pub lfQuality: u8,
    pub lfPitchAndFamily: u8,
    pub lfFaceName: [u16; 32],
}

#[repr(C)]
pub struct DEVINFO {
    pub flGraphicsCaps: u32,
    pub lfDefaultFont: LOGFONTW,
    pub lfAnsiVarFont: LOGFONTW,
    pub lfAnsiFixFont: LOGFONTW,
    pub cFonts: u32,
    pub iDitherFormat: u32,
    pub cxDither: u16,
    pub cyDither: u16,
    pub hpalDefault: *mut core::ffi::c_void,
    pub flGraphicsCaps2: u32,
}
import "golang.org/x/sys/windows"

type LOGFONTW struct {
	lfHeight int32
	lfWidth int32
	lfEscapement int32
	lfOrientation int32
	lfWeight int32
	lfItalic byte
	lfUnderline byte
	lfStrikeOut byte
	lfCharSet byte
	lfOutPrecision byte
	lfClipPrecision byte
	lfQuality byte
	lfPitchAndFamily byte
	lfFaceName [32]uint16
}

type DEVINFO struct {
	flGraphicsCaps uint32
	lfDefaultFont LOGFONTW
	lfAnsiVarFont LOGFONTW
	lfAnsiFixFont LOGFONTW
	cFonts uint32
	iDitherFormat uint32
	cxDither uint16
	cyDither uint16
	hpalDefault uintptr
	flGraphicsCaps2 uint32
}
type
  LOGFONTW = record
    lfHeight: Integer;
    lfWidth: Integer;
    lfEscapement: Integer;
    lfOrientation: Integer;
    lfWeight: Integer;
    lfItalic: Byte;
    lfUnderline: Byte;
    lfStrikeOut: Byte;
    lfCharSet: Byte;
    lfOutPrecision: Byte;
    lfClipPrecision: Byte;
    lfQuality: Byte;
    lfPitchAndFamily: Byte;
    lfFaceName: array[0..31] of WideChar;
  end;

  DEVINFO = record
    flGraphicsCaps: DWORD;
    lfDefaultFont: LOGFONTW;
    lfAnsiVarFont: LOGFONTW;
    lfAnsiFixFont: LOGFONTW;
    cFonts: DWORD;
    iDitherFormat: DWORD;
    cxDither: Word;
    cyDither: Word;
    hpalDefault: Pointer;
    flGraphicsCaps2: DWORD;
  end;
const LOGFONTW = extern struct {
    lfHeight: i32,
    lfWidth: i32,
    lfEscapement: i32,
    lfOrientation: i32,
    lfWeight: i32,
    lfItalic: u8,
    lfUnderline: u8,
    lfStrikeOut: u8,
    lfCharSet: u8,
    lfOutPrecision: u8,
    lfClipPrecision: u8,
    lfQuality: u8,
    lfPitchAndFamily: u8,
    lfFaceName: [32]u16,
};

const DEVINFO = extern struct {
    flGraphicsCaps: u32,
    lfDefaultFont: LOGFONTW,
    lfAnsiVarFont: LOGFONTW,
    lfAnsiFixFont: LOGFONTW,
    cFonts: u32,
    iDitherFormat: u32,
    cxDither: u16,
    cyDither: u16,
    hpalDefault: ?*anyopaque,
    flGraphicsCaps2: u32,
};
type
  LOGFONTW {.bycopy.} = object
    lfHeight: int32
    lfWidth: int32
    lfEscapement: int32
    lfOrientation: int32
    lfWeight: int32
    lfItalic: uint8
    lfUnderline: uint8
    lfStrikeOut: uint8
    lfCharSet: uint8
    lfOutPrecision: uint8
    lfClipPrecision: uint8
    lfQuality: uint8
    lfPitchAndFamily: uint8
    lfFaceName: array[32, uint16]

  DEVINFO {.bycopy.} = object
    flGraphicsCaps: uint32
    lfDefaultFont: LOGFONTW
    lfAnsiVarFont: LOGFONTW
    lfAnsiFixFont: LOGFONTW
    cFonts: uint32
    iDitherFormat: uint32
    cxDither: uint16
    cyDither: uint16
    hpalDefault: pointer
    flGraphicsCaps2: uint32
struct LOGFONTW
{
    int lfHeight;
    int lfWidth;
    int lfEscapement;
    int lfOrientation;
    int lfWeight;
    ubyte lfItalic;
    ubyte lfUnderline;
    ubyte lfStrikeOut;
    ubyte lfCharSet;
    ubyte lfOutPrecision;
    ubyte lfClipPrecision;
    ubyte lfQuality;
    ubyte lfPitchAndFamily;
    wchar[32] lfFaceName;
}

struct DEVINFO
{
    uint flGraphicsCaps;
    LOGFONTW lfDefaultFont;
    LOGFONTW lfAnsiVarFont;
    LOGFONTW lfAnsiFixFont;
    uint cFonts;
    uint iDitherFormat;
    ushort cxDither;
    ushort cyDither;
    void* hpalDefault;
    uint flGraphicsCaps2;
}

HSP用 定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; DEVINFO サイズ: 300 バイト(x86)
dim st, 75    ; 4byte整数×75(構造体サイズ 300 / 4 切り上げ)
; flGraphicsCaps : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; lfDefaultFont : LOGFONTW (+4, 92byte)  varptr(st)+4 を基点に操作(92byte:入れ子/配列)
; lfAnsiVarFont : LOGFONTW (+96, 92byte)  varptr(st)+96 を基点に操作(92byte:入れ子/配列)
; lfAnsiFixFont : LOGFONTW (+188, 92byte)  varptr(st)+188 を基点に操作(92byte:入れ子/配列)
; cFonts : DWORD (+280, 4byte)  st.70 = 値  /  値 = st.70   (lpoke/lpeek も可)
; iDitherFormat : DWORD (+284, 4byte)  st.71 = 値  /  値 = st.71   (lpoke/lpeek も可)
; cxDither : WORD (+288, 2byte)  wpoke st,288,値  /  値 = wpeek(st,288)
; cyDither : WORD (+290, 2byte)  wpoke st,290,値  /  値 = wpeek(st,290)
; hpalDefault : HPALETTE (+292, 4byte)  st.73 = 値  /  値 = st.73   (lpoke/lpeek も可)
; flGraphicsCaps2 : DWORD (+296, 4byte)  st.74 = 値  /  値 = st.74   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; DEVINFO サイズ: 312 バイト(x64)
dim st, 78    ; 4byte整数×78(構造体サイズ 312 / 4 切り上げ)
; flGraphicsCaps : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; lfDefaultFont : LOGFONTW (+4, 92byte)  varptr(st)+4 を基点に操作(92byte:入れ子/配列)
; lfAnsiVarFont : LOGFONTW (+96, 92byte)  varptr(st)+96 を基点に操作(92byte:入れ子/配列)
; lfAnsiFixFont : LOGFONTW (+188, 92byte)  varptr(st)+188 を基点に操作(92byte:入れ子/配列)
; cFonts : DWORD (+280, 4byte)  st.70 = 値  /  値 = st.70   (lpoke/lpeek も可)
; iDitherFormat : DWORD (+284, 4byte)  st.71 = 値  /  値 = st.71   (lpoke/lpeek も可)
; cxDither : WORD (+288, 2byte)  wpoke st,288,値  /  値 = wpeek(st,288)
; cyDither : WORD (+290, 2byte)  wpoke st,290,値  /  値 = wpeek(st,290)
; hpalDefault : HPALETTE (+296, 8byte)  qpoke st,296,値 / qpeek(st,296)  ※IronHSPのみ。3.7/3.8は lpoke st,296,下位 : lpoke st,300,上位
; flGraphicsCaps2 : DWORD (+304, 4byte)  st.76 = 値  /  値 = st.76   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global LOGFONTW
    #field int lfHeight
    #field int lfWidth
    #field int lfEscapement
    #field int lfOrientation
    #field int lfWeight
    #field byte lfItalic
    #field byte lfUnderline
    #field byte lfStrikeOut
    #field byte lfCharSet
    #field byte lfOutPrecision
    #field byte lfClipPrecision
    #field byte lfQuality
    #field byte lfPitchAndFamily
    #field wchar lfFaceName 32
#endstruct

#defstruct global DEVINFO
    #field int flGraphicsCaps
    #field LOGFONTW lfDefaultFont
    #field LOGFONTW lfAnsiVarFont
    #field LOGFONTW lfAnsiFixFont
    #field int cFonts
    #field int iDitherFormat
    #field short cxDither
    #field short cyDither
    #field intptr hpalDefault
    #field int flGraphicsCaps2
#endstruct

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