ホーム › System.Ole › ARRAYDESC
ARRAYDESC
構造体サイズ=各フィールドのバイト数(x64/x86 で異なる場合は x64/x86 と併記)。x64/x86 列=フィールドのバイトオフセット(HSPで dupptr / lpoke / wpoke 等に使用)。
フィールド
| フィールド | 型 | サイズ | x64 | x86 | 説明 |
|---|---|---|---|---|---|
| tdescElem | TYPEDESC | 16/8 | +0 | +0 | 配列要素の型を記述するTYPEDESCである。 |
| cDims | WORD | 2 | +16 | +8 | 配列の次元数を表す。 |
| rgbounds | SAFEARRAYBOUND | 8 | +20 | +12 | 各次元の境界(要素数と下限)を保持するSAFEARRAYBOUND配列の先頭である。 |
各言語での定義
#include <windows.h>
// TYPEDESC (x64 16 / x86 8 バイト)
typedef struct TYPEDESC {
_Anonymous_e__Union Anonymous;
VARENUM vt;
} TYPEDESC;
// SAFEARRAYBOUND (x64 8 / x86 8 バイト)
typedef struct SAFEARRAYBOUND {
DWORD cElements;
INT lLbound;
} SAFEARRAYBOUND;
// ARRAYDESC (x64 32 / x86 20 バイト)
typedef struct ARRAYDESC {
TYPEDESC tdescElem;
WORD cDims;
SAFEARRAYBOUND rgbounds[1];
} ARRAYDESC;using System;
using System.Runtime.InteropServices;
[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct TYPEDESC
{
public _Anonymous_e__Union Anonymous;
public ushort vt;
}
[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct SAFEARRAYBOUND
{
public uint cElements;
public int lLbound;
}
[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct ARRAYDESC
{
public TYPEDESC tdescElem;
public ushort cDims;
[MarshalAs(UnmanagedType.ByValArray, SizeConst = 1)] public SAFEARRAYBOUND[] rgbounds;
}Imports System.Runtime.InteropServices
<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure TYPEDESC
Public Anonymous As _Anonymous_e__Union
Public vt As UShort
End Structure
<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure SAFEARRAYBOUND
Public cElements As UInteger
Public lLbound As Integer
End Structure
<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure ARRAYDESC
Public tdescElem As TYPEDESC
Public cDims As UShort
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=1)> Public rgbounds() As SAFEARRAYBOUND
End Structureimport ctypes
from ctypes import wintypes
class TYPEDESC(ctypes.Structure):
_fields_ = [
("Anonymous", _Anonymous_e__Union),
("vt", ctypes.c_ushort),
]
class SAFEARRAYBOUND(ctypes.Structure):
_fields_ = [
("cElements", wintypes.DWORD),
("lLbound", ctypes.c_int),
]
class ARRAYDESC(ctypes.Structure):
_fields_ = [
("tdescElem", TYPEDESC),
("cDims", ctypes.c_ushort),
("rgbounds", SAFEARRAYBOUND * 1),
]#[repr(C)]
pub struct TYPEDESC {
pub Anonymous: _Anonymous_e__Union,
pub vt: u16,
}
#[repr(C)]
pub struct SAFEARRAYBOUND {
pub cElements: u32,
pub lLbound: i32,
}
#[repr(C)]
pub struct ARRAYDESC {
pub tdescElem: TYPEDESC,
pub cDims: u16,
pub rgbounds: [SAFEARRAYBOUND; 1],
}import "golang.org/x/sys/windows"
type TYPEDESC struct {
Anonymous _Anonymous_e__Union
vt uint16
}
type SAFEARRAYBOUND struct {
cElements uint32
lLbound int32
}
type ARRAYDESC struct {
tdescElem TYPEDESC
cDims uint16
rgbounds [1]SAFEARRAYBOUND
}type
TYPEDESC = record
Anonymous: _Anonymous_e__Union;
vt: Word;
end;
SAFEARRAYBOUND = record
cElements: DWORD;
lLbound: Integer;
end;
ARRAYDESC = record
tdescElem: TYPEDESC;
cDims: Word;
rgbounds: array[0..0] of SAFEARRAYBOUND;
end;const TYPEDESC = extern struct {
Anonymous: _Anonymous_e__Union,
vt: u16,
};
const SAFEARRAYBOUND = extern struct {
cElements: u32,
lLbound: i32,
};
const ARRAYDESC = extern struct {
tdescElem: TYPEDESC,
cDims: u16,
rgbounds: [1]SAFEARRAYBOUND,
};type
TYPEDESC {.bycopy.} = object
Anonymous: _Anonymous_e__Union
vt: uint16
SAFEARRAYBOUND {.bycopy.} = object
cElements: uint32
lLbound: int32
ARRAYDESC {.bycopy.} = object
tdescElem: TYPEDESC
cDims: uint16
rgbounds: array[1, SAFEARRAYBOUND]struct TYPEDESC
{
_Anonymous_e__Union Anonymous;
ushort vt;
}
struct SAFEARRAYBOUND
{
uint cElements;
int lLbound;
}
struct ARRAYDESC
{
TYPEDESC tdescElem;
ushort cDims;
SAFEARRAYBOUND[1] rgbounds;
}HSP用 定義
HSP3.7/3.8 は構造体機能が無いため4byte整数配列(dim)+peek/poke で操作(32/64bitでサイズ・位置が異なる場合はタブで分割)。IronHSP は NSTRUCT(#defstruct/stdim/->)で32/64bit共通。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x86 レイアウト)
; ARRAYDESC サイズ: 20 バイト(x86)
dim st, 5 ; 4byte整数×5(構造体サイズ 20 / 4 切り上げ)
; tdescElem : TYPEDESC (+0, 8byte) varptr(st)+0 を基点に操作(8byte:入れ子/配列)
; cDims : WORD (+8, 2byte) wpoke st,8,値 / 値 = wpeek(st,8)
; rgbounds : SAFEARRAYBOUND (+12, 8byte) varptr(st)+12 を基点に操作(8byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; ARRAYDESC サイズ: 32 バイト(x64)
dim st, 8 ; 4byte整数×8(構造体サイズ 32 / 4 切り上げ)
; tdescElem : TYPEDESC (+0, 16byte) varptr(st)+0 を基点に操作(16byte:入れ子/配列)
; cDims : WORD (+16, 2byte) wpoke st,16,値 / 値 = wpeek(st,16)
; rgbounds : SAFEARRAYBOUND (+20, 8byte) varptr(st)+20 を基点に操作(8byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global TYPEDESC
#field byte Anonymous 8
#field short vt
#endstruct
#defstruct global SAFEARRAYBOUND
#field int cElements
#field int lLbound
#endstruct
#defstruct global ARRAYDESC
#field TYPEDESC tdescElem
#field short cDims
#field SAFEARRAYBOUND rgbounds 1
#endstruct
stdim st, ARRAYDESC ; NSTRUCT 変数を確保
st->cDims = 100
mes "cDims=" + st->cDims