SHStripMneumonicA
関数文字列からアクセスキー用のアンパサンドを除去する。
シグネチャ
// SHLWAPI.dll (ANSI / -A)
#include <windows.h>
CHAR SHStripMneumonicA(
LPSTR pszMenu
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| pszMenu | LPSTR | inout | ニーモニック(&記号)を除去する対象の文字列。インプレースで書き換えられる。 |
戻り値の型: CHAR
各言語での呼び出し定義
// SHLWAPI.dll (ANSI / -A)
#include <windows.h>
CHAR SHStripMneumonicA(
LPSTR pszMenu
);[DllImport("SHLWAPI.dll", CharSet = CharSet.Ansi, ExactSpelling = true)]
static extern sbyte SHStripMneumonicA(
[MarshalAs(UnmanagedType.LPStr)] System.Text.StringBuilder pszMenu // LPSTR in/out
);<DllImport("SHLWAPI.dll", CharSet:=CharSet.Ansi, ExactSpelling:=True)>
Public Shared Function SHStripMneumonicA(
<MarshalAs(UnmanagedType.LPStr)> pszMenu As System.Text.StringBuilder ' LPSTR in/out
) As SByte
End Function' pszMenu : LPSTR in/out
Declare PtrSafe Function SHStripMneumonicA Lib "shlwapi" ( _
ByVal pszMenu As String) As Byte
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
SHStripMneumonicA = ctypes.windll.shlwapi.SHStripMneumonicA
SHStripMneumonicA.restype = ctypes.c_byte
SHStripMneumonicA.argtypes = [
wintypes.LPSTR, # pszMenu : LPSTR in/out
]require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('SHLWAPI.dll')
SHStripMneumonicA = Fiddle::Function.new(
lib['SHStripMneumonicA'],
[
Fiddle::TYPE_VOIDP, # pszMenu : LPSTR in/out
],
Fiddle::TYPE_CHAR)#[link(name = "shlwapi")]
extern "system" {
fn SHStripMneumonicA(
pszMenu: *mut u8 // LPSTR in/out
) -> i8;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("SHLWAPI.dll", CharSet = CharSet.Ansi)]
public static extern sbyte SHStripMneumonicA([MarshalAs(UnmanagedType.LPStr)] System.Text.StringBuilder pszMenu);
"@
$api = Add-Type -MemberDefinition $sig -Name 'SHLWAPI_SHStripMneumonicA' -Namespace Win32 -PassThru
# $api::SHStripMneumonicA(pszMenu)#uselib "SHLWAPI.dll"
#func global SHStripMneumonicA "SHStripMneumonicA" sptr
; SHStripMneumonicA varptr(pszMenu) ; 戻り値は stat
; pszMenu : LPSTR in/out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "SHLWAPI.dll" #cfunc global SHStripMneumonicA "SHStripMneumonicA" var ; res = SHStripMneumonicA(pszMenu) ; pszMenu : LPSTR in/out -> "var" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "SHLWAPI.dll" #cfunc global SHStripMneumonicA "SHStripMneumonicA" sptr ; res = SHStripMneumonicA(varptr(pszMenu)) ; pszMenu : LPSTR in/out -> "sptr" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; CHAR SHStripMneumonicA(LPSTR pszMenu) #uselib "SHLWAPI.dll" #cfunc global SHStripMneumonicA "SHStripMneumonicA" var ; res = SHStripMneumonicA(pszMenu) ; pszMenu : LPSTR in/out -> "var" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; CHAR SHStripMneumonicA(LPSTR pszMenu) #uselib "SHLWAPI.dll" #cfunc global SHStripMneumonicA "SHStripMneumonicA" intptr ; res = SHStripMneumonicA(varptr(pszMenu)) ; pszMenu : LPSTR in/out -> "intptr" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
shlwapi = windows.NewLazySystemDLL("SHLWAPI.dll")
procSHStripMneumonicA = shlwapi.NewProc("SHStripMneumonicA")
)
// pszMenu (LPSTR in/out)
r1, _, err := procSHStripMneumonicA.Call(
uintptr(pszMenu),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // CHARfunction SHStripMneumonicA(
pszMenu: PAnsiChar // LPSTR in/out
): Shortint; stdcall;
external 'SHLWAPI.dll' name 'SHStripMneumonicA';result := DllCall("SHLWAPI\SHStripMneumonicA"
, "Ptr", pszMenu ; LPSTR in/out
, "Char") ; return: CHAR●SHStripMneumonicA(pszMenu) = DLL("SHLWAPI.dll", "char SHStripMneumonicA(char*)")
# 呼び出し: SHStripMneumonicA(pszMenu)
# pszMenu : LPSTR in/out -> "char*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。