IsWellFormedTag

関数

BCP47言語タグが整形式か判定する。

DLLbcp47mrm.dll呼出規約winapi

シグネチャ

// bcp47mrm.dll
#include <windows.h>

BYTE IsWellFormedTag(
    LPCWSTR pszTag
);

パラメーター

名前	型	方向	説明
pszTag	LPCWSTR	in	整形式かどうかを検証するBCP-47言語タグ文字列へのポインター。

戻り値の型: BYTE

各言語での呼び出し定義

// bcp47mrm.dll
#include <windows.h>

BYTE IsWellFormedTag(
    LPCWSTR pszTag
);

[DllImport("bcp47mrm.dll", ExactSpelling = true)]
static extern byte IsWellFormedTag(
    [MarshalAs(UnmanagedType.LPWStr)] string pszTag   // LPCWSTR
);

<DllImport("bcp47mrm.dll", ExactSpelling:=True)>
Public Shared Function IsWellFormedTag(
    <MarshalAs(UnmanagedType.LPWStr)> pszTag As String   ' LPCWSTR
) As Byte
End Function

' pszTag : LPCWSTR
Declare PtrSafe Function IsWellFormedTag Lib "bcp47mrm" ( _
    ByVal pszTag As LongPtr) As Byte
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

IsWellFormedTag = ctypes.windll.bcp47mrm.IsWellFormedTag
IsWellFormedTag.restype = ctypes.c_ubyte
IsWellFormedTag.argtypes = [
    wintypes.LPCWSTR,  # pszTag : LPCWSTR
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('bcp47mrm.dll')
IsWellFormedTag = Fiddle::Function.new(
  lib['IsWellFormedTag'],
  [
    Fiddle::TYPE_VOIDP,  # pszTag : LPCWSTR
  ],
  -Fiddle::TYPE_CHAR)

#[link(name = "bcp47mrm")]
extern "system" {
    fn IsWellFormedTag(
        pszTag: *const u16  // LPCWSTR
    ) -> u8;
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("bcp47mrm.dll")]
public static extern byte IsWellFormedTag([MarshalAs(UnmanagedType.LPWStr)] string pszTag);
"@
$api = Add-Type -MemberDefinition $sig -Name 'bcp47mrm_IsWellFormedTag' -Namespace Win32 -PassThru
# $api::IsWellFormedTag(pszTag)

#uselib "bcp47mrm.dll"
#func global IsWellFormedTag "IsWellFormedTag" sptr
; IsWellFormedTag pszTag   ; 戻り値は stat
; pszTag : LPCWSTR -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。

#uselib "bcp47mrm.dll"
#cfunc global IsWellFormedTag "IsWellFormedTag" wstr
; res = IsWellFormedTag(pszTag)
; pszTag : LPCWSTR -> "wstr"

; BYTE IsWellFormedTag(LPCWSTR pszTag)
#uselib "bcp47mrm.dll"
#cfunc global IsWellFormedTag "IsWellFormedTag" wstr
; res = IsWellFormedTag(pszTag)
; pszTag : LPCWSTR -> "wstr"

import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	bcp47mrm = windows.NewLazySystemDLL("bcp47mrm.dll")
	procIsWellFormedTag = bcp47mrm.NewProc("IsWellFormedTag")
)

// pszTag (LPCWSTR)
r1, _, err := procIsWellFormedTag.Call(
	uintptr(unsafe.Pointer(windows.StringToUTF16Ptr(pszTag))),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // BYTE

function IsWellFormedTag(
  pszTag: PWideChar   // LPCWSTR
): Byte; stdcall;
  external 'bcp47mrm.dll' name 'IsWellFormedTag';

result := DllCall("bcp47mrm\IsWellFormedTag"
    , "WStr", pszTag   ; LPCWSTR
    , "UChar")   ; return: BYTE

●IsWellFormedTag(pszTag) = DLL("bcp47mrm.dll", "byte IsWellFormedTag(char*)")
# 呼び出し: IsWellFormedTag(pszTag)
# pszTag : LPCWSTR -> "char*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。