ホーム › System.Search › DBVARYBIN
DBVARYBIN
構造体サイズ=各フィールドのバイト数(x64/x86 で異なる場合は x64/x86 と併記)。x64/x86 列=フィールドのバイトオフセット(HSPで dupptr / lpoke / wpoke 等に使用)。
フィールド
| フィールド | 型 | サイズ | x64 | x86 | 説明 |
|---|---|---|---|---|---|
| len | SHORT | 2 | +0 | +0 | バイナリデータの有効バイト長。 |
| array | BYTE | 8001 | +2 | +2 | 可変長バイナリデータを格納するバイト配列。 |
各言語での定義
#include <windows.h>
// DBVARYBIN (x64 8004 / x86 8004 バイト)
typedef struct DBVARYBIN {
SHORT len;
BYTE array[8001];
} DBVARYBIN;using System;
using System.Runtime.InteropServices;
[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct DBVARYBIN
{
public short len;
[MarshalAs(UnmanagedType.ByValArray, SizeConst = 8001)] public byte[] array;
}Imports System.Runtime.InteropServices
<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure DBVARYBIN
Public len As Short
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=8001)> Public array() As Byte
End Structureimport ctypes
from ctypes import wintypes
class DBVARYBIN(ctypes.Structure):
_fields_ = [
("len", ctypes.c_short),
("array", ctypes.c_ubyte * 8001),
]#[repr(C)]
pub struct DBVARYBIN {
pub len: i16,
pub array: [u8; 8001],
}import "golang.org/x/sys/windows"
type DBVARYBIN struct {
len int16
array [8001]byte
}type
DBVARYBIN = record
len: Smallint;
array: array[0..8000] of Byte;
end;const DBVARYBIN = extern struct {
len: i16,
array: [8001]u8,
};type
DBVARYBIN {.bycopy.} = object
len: int16
array: array[8001, uint8]struct DBVARYBIN
{
short len;
ubyte[8001] array;
}HSP用 定義
HSP3.7/3.8 は構造体機能が無いため4byte整数配列(dim)+peek/poke で操作(32/64bitでサイズ・位置が異なる場合はタブで分割)。IronHSP は NSTRUCT(#defstruct/stdim/->)で32/64bit共通。
; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; DBVARYBIN サイズ: 8004 バイト(x64)
dim st, 2001 ; 4byte整数×2001(構造体サイズ 8004 / 4 切り上げ)
; len : SHORT (+0, 2byte) wpoke st,0,値 / 値 = wpeek(st,0)
; array : BYTE (+2, 8001byte) varptr(st)+2 を基点に操作(8001byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
#defstruct global DBVARYBIN
#field short len
#field byte array 8001
#endstruct
stdim st, DBVARYBIN ; NSTRUCT 変数を確保
st->len = 100
mes "len=" + st->len