EMRPOLYTEXTOUTA

構造体

サイズx64: 80 バイト / x86: 80 バイト

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

フィールド

フィールド	型	サイズ	x64	x86	説明
emr	EMR	8	+0	+0	共通レコードヘッダを表すEMR構造体。
rclBounds	RECTL	16	+8	+8	テキスト描画範囲の外接矩形を表すRECTL構造体。
iGraphicsMode	DWORD	4	+24	+24	グラフィックスモードを表す。GM_COMPATIBLEまたはGM_ADVANCED。
exScale	FLOAT	4	+28	+28	X方向の倍率を浮動小数点で表す(GM_COMPATIBLE時に使用)。
eyScale	FLOAT	4	+32	+32	Y方向の倍率を浮動小数点で表す(GM_COMPATIBLE時に使用)。
cStrings	INT	4	+36	+36	描画する文字列の個数を表す。
aemrtext	EMRTEXT	40	+40	+40	各文字列の情報を表すEMRTEXT配列の先頭(可変長)。

各言語での定義

#include <windows.h>

// EMR  (x64 8 / x86 8 バイト)
typedef struct EMR {
    ENHANCED_METAFILE_RECORD_TYPE iType;
    DWORD nSize;
} EMR;

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

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

// EMRTEXT  (x64 40 / x86 40 バイト)
typedef struct EMRTEXT {
    POINTL ptlReference;
    DWORD nChars;
    DWORD offString;
    DWORD fOptions;
    RECTL rcl;
    DWORD offDx;
} EMRTEXT;

// EMRPOLYTEXTOUTA  (x64 80 / x86 80 バイト)
typedef struct EMRPOLYTEXTOUTA {
    EMR emr;
    RECTL rclBounds;
    DWORD iGraphicsMode;
    FLOAT exScale;
    FLOAT eyScale;
    INT cStrings;
    EMRTEXT aemrtext[1];
} EMRPOLYTEXTOUTA;

using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct EMR
{
    public uint iType;
    public uint nSize;
}

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

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

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct EMRTEXT
{
    public POINTL ptlReference;
    public uint nChars;
    public uint offString;
    public uint fOptions;
    public RECTL rcl;
    public uint offDx;
}

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct EMRPOLYTEXTOUTA
{
    public EMR emr;
    public RECTL rclBounds;
    public uint iGraphicsMode;
    public float exScale;
    public float eyScale;
    public int cStrings;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 1)] public EMRTEXT[] aemrtext;
}

Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure EMR
    Public iType As UInteger
    Public nSize As UInteger
End Structure

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

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

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure EMRTEXT
    Public ptlReference As POINTL
    Public nChars As UInteger
    Public offString As UInteger
    Public fOptions As UInteger
    Public rcl As RECTL
    Public offDx As UInteger
End Structure

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure EMRPOLYTEXTOUTA
    Public emr As EMR
    Public rclBounds As RECTL
    Public iGraphicsMode As UInteger
    Public exScale As Single
    Public eyScale As Single
    Public cStrings As Integer
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=1)> Public aemrtext() As EMRTEXT
End Structure

import ctypes
from ctypes import wintypes

class EMR(ctypes.Structure):
    _fields_ = [
        ("iType", wintypes.DWORD),
        ("nSize", wintypes.DWORD),
    ]

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

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

class EMRTEXT(ctypes.Structure):
    _fields_ = [
        ("ptlReference", POINTL),
        ("nChars", wintypes.DWORD),
        ("offString", wintypes.DWORD),
        ("fOptions", wintypes.DWORD),
        ("rcl", RECTL),
        ("offDx", wintypes.DWORD),
    ]

class EMRPOLYTEXTOUTA(ctypes.Structure):
    _fields_ = [
        ("emr", EMR),
        ("rclBounds", RECTL),
        ("iGraphicsMode", wintypes.DWORD),
        ("exScale", ctypes.c_float),
        ("eyScale", ctypes.c_float),
        ("cStrings", ctypes.c_int),
        ("aemrtext", EMRTEXT * 1),
    ]

#[repr(C)]
pub struct EMR {
    pub iType: u32,
    pub nSize: u32,
}

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

#[repr(C)]
pub struct POINTL {
    pub x: i32,
    pub y: i32,
}

#[repr(C)]
pub struct EMRTEXT {
    pub ptlReference: POINTL,
    pub nChars: u32,
    pub offString: u32,
    pub fOptions: u32,
    pub rcl: RECTL,
    pub offDx: u32,
}

#[repr(C)]
pub struct EMRPOLYTEXTOUTA {
    pub emr: EMR,
    pub rclBounds: RECTL,
    pub iGraphicsMode: u32,
    pub exScale: f32,
    pub eyScale: f32,
    pub cStrings: i32,
    pub aemrtext: [EMRTEXT; 1],
}

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

type EMR struct {
	iType uint32
	nSize uint32
}

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

type POINTL struct {
	x int32
	y int32
}

type EMRTEXT struct {
	ptlReference POINTL
	nChars uint32
	offString uint32
	fOptions uint32
	rcl RECTL
	offDx uint32
}

type EMRPOLYTEXTOUTA struct {
	emr EMR
	rclBounds RECTL
	iGraphicsMode uint32
	exScale float32
	eyScale float32
	cStrings int32
	aemrtext [1]EMRTEXT
}

type
  EMR = record
    iType: DWORD;
    nSize: DWORD;
  end;

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

  POINTL = record
    x: Integer;
    y: Integer;
  end;

  EMRTEXT = record
    ptlReference: POINTL;
    nChars: DWORD;
    offString: DWORD;
    fOptions: DWORD;
    rcl: RECTL;
    offDx: DWORD;
  end;

  EMRPOLYTEXTOUTA = record
    emr: EMR;
    rclBounds: RECTL;
    iGraphicsMode: DWORD;
    exScale: Single;
    eyScale: Single;
    cStrings: Integer;
    aemrtext: array[0..0] of EMRTEXT;
  end;

const EMR = extern struct {
    iType: u32,
    nSize: u32,
};

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

const POINTL = extern struct {
    x: i32,
    y: i32,
};

const EMRTEXT = extern struct {
    ptlReference: POINTL,
    nChars: u32,
    offString: u32,
    fOptions: u32,
    rcl: RECTL,
    offDx: u32,
};

const EMRPOLYTEXTOUTA = extern struct {
    emr: EMR,
    rclBounds: RECTL,
    iGraphicsMode: u32,
    exScale: f32,
    eyScale: f32,
    cStrings: i32,
    aemrtext: [1]EMRTEXT,
};

type
  EMR {.bycopy.} = object
    iType: uint32
    nSize: uint32

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

  POINTL {.bycopy.} = object
    x: int32
    y: int32

  EMRTEXT {.bycopy.} = object
    ptlReference: POINTL
    nChars: uint32
    offString: uint32
    fOptions: uint32
    rcl: RECTL
    offDx: uint32

  EMRPOLYTEXTOUTA {.bycopy.} = object
    emr: EMR
    rclBounds: RECTL
    iGraphicsMode: uint32
    exScale: float32
    eyScale: float32
    cStrings: int32
    aemrtext: array[1, EMRTEXT]

struct EMR
{
    uint iType;
    uint nSize;
}

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

struct POINTL
{
    int x;
    int y;
}

struct EMRTEXT
{
    POINTL ptlReference;
    uint nChars;
    uint offString;
    uint fOptions;
    RECTL rcl;
    uint offDx;
}

struct EMRPOLYTEXTOUTA
{
    EMR emr;
    RECTL rclBounds;
    uint iGraphicsMode;
    float exScale;
    float eyScale;
    int cStrings;
    EMRTEXT[1] aemrtext;
}

HSP用定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; EMRPOLYTEXTOUTA サイズ: 80 バイト(x64)
dim st, 20    ; 4byte整数×20(構造体サイズ 80 / 4 切り上げ)
; emr : EMR (+0, 8byte)  varptr(st)+0 を基点に操作(8byte:入れ子/配列)
; rclBounds : RECTL (+8, 16byte)  varptr(st)+8 を基点に操作(16byte:入れ子/配列)
; iGraphicsMode : DWORD (+24, 4byte)  st.6 = 値  /  値 = st.6   (lpoke/lpeek も可)
; exScale : FLOAT (+28, 4byte)  st.7 = 値  /  値 = st.7   (lpoke/lpeek も可)
; eyScale : FLOAT (+32, 4byte)  st.8 = 値  /  値 = st.8   (lpoke/lpeek も可)
; cStrings : INT (+36, 4byte)  st.9 = 値  /  値 = st.9   (lpoke/lpeek も可)
; aemrtext : EMRTEXT (+40, 40byte)  varptr(st)+40 を基点に操作(40byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。

; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global EMR
    #field int iType
    #field int nSize
#endstruct

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

#defstruct global POINTL
    #field int x
    #field int y
#endstruct

#defstruct global EMRTEXT
    #field POINTL ptlReference
    #field int nChars
    #field int offString
    #field int fOptions
    #field RECTL rcl
    #field int offDx
#endstruct

#defstruct global EMRPOLYTEXTOUTA
    #field EMR emr
    #field RECTL rclBounds
    #field int iGraphicsMode
    #field float exScale
    #field float eyScale
    #field int cStrings
    #field EMRTEXT aemrtext 1
#endstruct

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

EMRPOLYTEXTOUTA

フィールド

各言語での定義

HSP用 定義

HSP用定義