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

SAFEARRAYBOUND

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

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

フィールド

フィールドサイズx64x86説明
cElementsDWORD4+0+0この次元の要素数。
lLboundINT4+4+4この次元の下限インデックス。

各言語での定義

#include <windows.h>

// SAFEARRAYBOUND  (x64 8 / x86 8 バイト)
typedef struct SAFEARRAYBOUND {
    DWORD cElements;
    INT lLbound;
} SAFEARRAYBOUND;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct SAFEARRAYBOUND
{
    public uint cElements;
    public int lLbound;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure SAFEARRAYBOUND
    Public cElements As UInteger
    Public lLbound As Integer
End Structure
import ctypes
from ctypes import wintypes

class SAFEARRAYBOUND(ctypes.Structure):
    _fields_ = [
        ("cElements", wintypes.DWORD),
        ("lLbound", ctypes.c_int),
    ]
#[repr(C)]
pub struct SAFEARRAYBOUND {
    pub cElements: u32,
    pub lLbound: i32,
}
import "golang.org/x/sys/windows"

type SAFEARRAYBOUND struct {
	cElements uint32
	lLbound int32
}
type
  SAFEARRAYBOUND = record
    cElements: DWORD;
    lLbound: Integer;
  end;
const SAFEARRAYBOUND = extern struct {
    cElements: u32,
    lLbound: i32,
};
type
  SAFEARRAYBOUND {.bycopy.} = object
    cElements: uint32
    lLbound: int32
struct SAFEARRAYBOUND
{
    uint cElements;
    int lLbound;
}

HSP用 定義

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

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; SAFEARRAYBOUND サイズ: 8 バイト(x64)
dim st, 2    ; 4byte整数×2(構造体サイズ 8 / 4 切り上げ)
; cElements : DWORD (+0, 4byte)  st.0 = 値  /  値 = st.0   (lpoke/lpeek も可)
; lLbound : INT (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。
; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
#defstruct global SAFEARRAYBOUND
    #field int cElements
    #field int lLbound
#endstruct

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