Win32 API 日本語リファレンス
ホーム › Storage.FileSystem › TAPE_WRITE_MARKS

TAPE_WRITE_MARKS

構造体
📘 Microsoft Learn (日本語) · English
サイズx64: 12 バイト / x86: 12 バイト

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

フィールド

フィールド型サイズx64x86説明
TypeTAPEMARK_TYPE4+0+0書き込むマークの種類(ファイルマーク/セットマーク等のTAPEMARK_TYPE)。
CountDWORD4+4+4書き込むマークの数。
ImmediateBOOLEAN1+8+8TRUEなら完了を待たず即座に制御を返す。

各言語での定義

#include <windows.h>

// TAPE_WRITE_MARKS  (x64 12 / x86 12 バイト)
typedef struct TAPE_WRITE_MARKS {
    TAPEMARK_TYPE Type;
    DWORD Count;
    BOOLEAN Immediate;
} TAPE_WRITE_MARKS;
using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
public struct TAPE_WRITE_MARKS
{
    public uint Type;
    public uint Count;
    [MarshalAs(UnmanagedType.U1)] public bool Immediate;
}
Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)>
Public Structure TAPE_WRITE_MARKS
    Public Type As UInteger
    Public Count As UInteger
    <MarshalAs(UnmanagedType.U1)> Public Immediate As Boolean
End Structure
import ctypes
from ctypes import wintypes

class TAPE_WRITE_MARKS(ctypes.Structure):
    _fields_ = [
        ("Type", wintypes.DWORD),
        ("Count", wintypes.DWORD),
        ("Immediate", ctypes.c_byte),
    ]
#[repr(C)]
pub struct TAPE_WRITE_MARKS {
    pub Type: u32,
    pub Count: u32,
    pub Immediate: u8,
}
import "golang.org/x/sys/windows"

type TAPE_WRITE_MARKS struct {
	Type uint32
	Count uint32
	Immediate byte
}
type
  TAPE_WRITE_MARKS = record
    Type: DWORD;
    Count: DWORD;
    Immediate: ByteBool;
  end;
const TAPE_WRITE_MARKS = extern struct {
    Type: u32,
    Count: u32,
    Immediate: u8,
};
type
  TAPE_WRITE_MARKS {.bycopy.} = object
    Type: uint32
    Count: uint32
    Immediate: uint8
struct TAPE_WRITE_MARKS
{
    uint Type;
    uint Count;
    ubyte Immediate;
}

HSP用 定義

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

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

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