Win32 API 日本語リファレンス
ホームUI.Shell › SHOpenPropSheetW

SHOpenPropSheetW

関数
シェルアイテムのプロパティシートを開いて表示する。
DLLSHELL32.dll文字セットUnicode (-W)呼出規約winapi対応OSWindows XP 以降

シグネチャ

// SHELL32.dll  (Unicode / -W)
#include <windows.h>

BOOL SHOpenPropSheetW(
    LPCWSTR pszCaption,   // optional
    HKEY* ahkeys,   // optional
    DWORD ckeys,
    const GUID* pclsidDefault,   // optional
    IDataObject* pdtobj,
    IShellBrowser* psb,   // optional
    LPCWSTR pStartPage   // optional
);

パラメーター

名前方向説明
pszCaptionLPCWSTRinoptionalプロパティシートのキャプションを格納する文字列へのポインター。キャプションが不要な場合、この値は NULL にできます。
ahkeysHKEY*inoptional個々のプロパティシートの CLSID を表すレジストリキーの配列。
ckeysDWORDinahkeys で指定された配列内のプロパティシートの数を指定する UINT 値。
pclsidDefaultGUID*inoptional既定の CLSID へのポインター。この値は NULL にできます。
pdtobjIDataObject*inIDataObject へのポインター。プロパティシートに対する操作を実行するために使用できる OLE オブジェクトです。
psbIShellBrowser*inoptional使用されません。
pStartPageLPCWSTRinoptional開始ページを指定する文字列へのポインター。この値は NULL にできます。

戻り値の型: BOOL

公式ドキュメント

SHOpenPropSheet は変更されるか、利用できなくなる可能性があります。(Unicode)

戻り値

型: BOOL

プロパティシートが正常に作成された場合は TRUE を返します。それ以外の場合は FALSE を返します。

解説(Remarks)

メモ

shlobj.h ヘッダーは、UNICODE プリプロセッサ定数の定義に基づいて、この関数の ANSI 版または Unicode 版を自動的に選択するエイリアスとして SHOpenPropSheet を定義します。エンコーディング非依存のエイリアスを、エンコーディング非依存ではないコードと混在させて使用すると、不一致が生じてコンパイルエラーや実行時エラーを引き起こす可能性があります。詳細については、Conventions for Function Prototypes を参照してください。

出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)

各言語での呼び出し定義

// SHELL32.dll  (Unicode / -W)
#include <windows.h>

BOOL SHOpenPropSheetW(
    LPCWSTR pszCaption,   // optional
    HKEY* ahkeys,   // optional
    DWORD ckeys,
    const GUID* pclsidDefault,   // optional
    IDataObject* pdtobj,
    IShellBrowser* psb,   // optional
    LPCWSTR pStartPage   // optional
);
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("SHELL32.dll", CharSet = CharSet.Unicode, ExactSpelling = true)]
static extern bool SHOpenPropSheetW(
    [MarshalAs(UnmanagedType.LPWStr)] string pszCaption,   // LPCWSTR optional
    IntPtr ahkeys,   // HKEY* optional
    uint ckeys,   // DWORD
    IntPtr pclsidDefault,   // GUID* optional
    IntPtr pdtobj,   // IDataObject*
    IntPtr psb,   // IShellBrowser* optional
    [MarshalAs(UnmanagedType.LPWStr)] string pStartPage   // LPCWSTR optional
);
<DllImport("SHELL32.dll", CharSet:=CharSet.Unicode, ExactSpelling:=True)>
Public Shared Function SHOpenPropSheetW(
    <MarshalAs(UnmanagedType.LPWStr)> pszCaption As String,   ' LPCWSTR optional
    ahkeys As IntPtr,   ' HKEY* optional
    ckeys As UInteger,   ' DWORD
    pclsidDefault As IntPtr,   ' GUID* optional
    pdtobj As IntPtr,   ' IDataObject*
    psb As IntPtr,   ' IShellBrowser* optional
    <MarshalAs(UnmanagedType.LPWStr)> pStartPage As String   ' LPCWSTR optional
) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
' pszCaption : LPCWSTR optional
' ahkeys : HKEY* optional
' ckeys : DWORD
' pclsidDefault : GUID* optional
' pdtobj : IDataObject*
' psb : IShellBrowser* optional
' pStartPage : LPCWSTR optional
Declare PtrSafe Function SHOpenPropSheetW Lib "shell32" ( _
    ByVal pszCaption As LongPtr, _
    ByVal ahkeys As LongPtr, _
    ByVal ckeys As Long, _
    ByVal pclsidDefault As LongPtr, _
    ByVal pdtobj As LongPtr, _
    ByVal psb As LongPtr, _
    ByVal pStartPage As LongPtr) As Long
' Unicode(W): 文字列は ByVal As LongPtr とし StrPtr(unicodeStr) を渡す
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。
import ctypes
from ctypes import wintypes

SHOpenPropSheetW = ctypes.windll.shell32.SHOpenPropSheetW
SHOpenPropSheetW.restype = wintypes.BOOL
SHOpenPropSheetW.argtypes = [
    wintypes.LPCWSTR,  # pszCaption : LPCWSTR optional
    ctypes.c_void_p,  # ahkeys : HKEY* optional
    wintypes.DWORD,  # ckeys : DWORD
    ctypes.c_void_p,  # pclsidDefault : GUID* optional
    ctypes.c_void_p,  # pdtobj : IDataObject*
    ctypes.c_void_p,  # psb : IShellBrowser* optional
    wintypes.LPCWSTR,  # pStartPage : LPCWSTR optional
]
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('SHELL32.dll')
SHOpenPropSheetW = Fiddle::Function.new(
  lib['SHOpenPropSheetW'],
  [
    Fiddle::TYPE_VOIDP,  # pszCaption : LPCWSTR optional
    Fiddle::TYPE_VOIDP,  # ahkeys : HKEY* optional
    -Fiddle::TYPE_INT,  # ckeys : DWORD
    Fiddle::TYPE_VOIDP,  # pclsidDefault : GUID* optional
    Fiddle::TYPE_VOIDP,  # pdtobj : IDataObject*
    Fiddle::TYPE_VOIDP,  # psb : IShellBrowser* optional
    Fiddle::TYPE_VOIDP,  # pStartPage : LPCWSTR optional
  ],
  Fiddle::TYPE_INT)
# Wide strings: pass str.encode("UTF-16LE") + "\x00\x00"
#[link(name = "shell32")]
extern "system" {
    fn SHOpenPropSheetW(
        pszCaption: *const u16,  // LPCWSTR optional
        ahkeys: *mut *mut core::ffi::c_void,  // HKEY* optional
        ckeys: u32,  // DWORD
        pclsidDefault: *const GUID,  // GUID* optional
        pdtobj: *mut core::ffi::c_void,  // IDataObject*
        psb: *mut core::ffi::c_void,  // IShellBrowser* optional
        pStartPage: *const u16  // LPCWSTR optional
    ) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.
$sig = @"
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("SHELL32.dll", CharSet = CharSet.Unicode)]
public static extern bool SHOpenPropSheetW([MarshalAs(UnmanagedType.LPWStr)] string pszCaption, IntPtr ahkeys, uint ckeys, IntPtr pclsidDefault, IntPtr pdtobj, IntPtr psb, [MarshalAs(UnmanagedType.LPWStr)] string pStartPage);
"@
$api = Add-Type -MemberDefinition $sig -Name 'SHELL32_SHOpenPropSheetW' -Namespace Win32 -PassThru
# $api::SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
#uselib "SHELL32.dll"
#func global SHOpenPropSheetW "SHOpenPropSheetW" wptr, wptr, wptr, wptr, wptr, wptr, wptr
; SHOpenPropSheetW pszCaption, ahkeys, ckeys, varptr(pclsidDefault), pdtobj, psb, pStartPage   ; 戻り値は stat
; pszCaption : LPCWSTR optional -> "wptr"
; ahkeys : HKEY* optional -> "wptr"
; ckeys : DWORD -> "wptr"
; pclsidDefault : GUID* optional -> "wptr"
; pdtobj : IDataObject* -> "wptr"
; psb : IShellBrowser* optional -> "wptr"
; pStartPage : LPCWSTR optional -> "wptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数:
#uselib "SHELL32.dll"
#cfunc global SHOpenPropSheetW "SHOpenPropSheetW" wstr, sptr, int, var, sptr, sptr, wstr
; res = SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
; pszCaption : LPCWSTR optional -> "wstr"
; ahkeys : HKEY* optional -> "sptr"
; ckeys : DWORD -> "int"
; pclsidDefault : GUID* optional -> "var"
; pdtobj : IDataObject* -> "sptr"
; psb : IShellBrowser* optional -> "sptr"
; pStartPage : LPCWSTR optional -> "wstr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数:
; BOOL SHOpenPropSheetW(LPCWSTR pszCaption, HKEY* ahkeys, DWORD ckeys, GUID* pclsidDefault, IDataObject* pdtobj, IShellBrowser* psb, LPCWSTR pStartPage)
#uselib "SHELL32.dll"
#cfunc global SHOpenPropSheetW "SHOpenPropSheetW" wstr, intptr, int, var, intptr, intptr, wstr
; res = SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
; pszCaption : LPCWSTR optional -> "wstr"
; ahkeys : HKEY* optional -> "intptr"
; ckeys : DWORD -> "int"
; pclsidDefault : GUID* optional -> "var"
; pdtobj : IDataObject* -> "intptr"
; psb : IShellBrowser* optional -> "intptr"
; pStartPage : LPCWSTR optional -> "wstr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	shell32 = windows.NewLazySystemDLL("SHELL32.dll")
	procSHOpenPropSheetW = shell32.NewProc("SHOpenPropSheetW")
)

// pszCaption (LPCWSTR optional), ahkeys (HKEY* optional), ckeys (DWORD), pclsidDefault (GUID* optional), pdtobj (IDataObject*), psb (IShellBrowser* optional), pStartPage (LPCWSTR optional)
r1, _, err := procSHOpenPropSheetW.Call(
	uintptr(unsafe.Pointer(windows.StringToUTF16Ptr(pszCaption))),
	uintptr(ahkeys),
	uintptr(ckeys),
	uintptr(pclsidDefault),
	uintptr(pdtobj),
	uintptr(psb),
	uintptr(unsafe.Pointer(windows.StringToUTF16Ptr(pStartPage))),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // BOOL
function SHOpenPropSheetW(
  pszCaption: PWideChar;   // LPCWSTR optional
  ahkeys: Pointer;   // HKEY* optional
  ckeys: DWORD;   // DWORD
  pclsidDefault: PGUID;   // GUID* optional
  pdtobj: Pointer;   // IDataObject*
  psb: Pointer;   // IShellBrowser* optional
  pStartPage: PWideChar   // LPCWSTR optional
): BOOL; stdcall;
  external 'SHELL32.dll' name 'SHOpenPropSheetW';
result := DllCall("SHELL32\SHOpenPropSheetW"
    , "WStr", pszCaption   ; LPCWSTR optional
    , "Ptr", ahkeys   ; HKEY* optional
    , "UInt", ckeys   ; DWORD
    , "Ptr", pclsidDefault   ; GUID* optional
    , "Ptr", pdtobj   ; IDataObject*
    , "Ptr", psb   ; IShellBrowser* optional
    , "WStr", pStartPage   ; LPCWSTR optional
    , "Int")   ; return: BOOL
●SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage) = DLL("SHELL32.dll", "bool SHOpenPropSheetW(char*, void*, dword, void*, void*, void*, char*)")
# 呼び出し: SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
# pszCaption : LPCWSTR optional -> "char*"
# ahkeys : HKEY* optional -> "void*"
# ckeys : DWORD -> "dword"
# pclsidDefault : GUID* optional -> "void*"
# pdtobj : IDataObject* -> "void*"
# psb : IShellBrowser* optional -> "void*"
# pStartPage : LPCWSTR optional -> "char*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
# ※-W(Unicode)関数。なでしこ1はANSIのため -A 版の利用を推奨。
const std = @import("std");

extern "shell32" fn SHOpenPropSheetW(
    pszCaption: [*c]const u16, // LPCWSTR optional
    ahkeys: ?*anyopaque, // HKEY* optional
    ckeys: u32, // DWORD
    pclsidDefault: [*c]GUID, // GUID* optional
    pdtobj: ?*anyopaque, // IDataObject*
    psb: ?*anyopaque, // IShellBrowser* optional
    pStartPage: [*c]const u16 // LPCWSTR optional
) callconv(std.os.windows.WINAPI) i32;
// Unicode(-W): UTF-16LE のヌル終端バッファ([*c]const u16)を渡す。
proc SHOpenPropSheetW(
    pszCaption: WideCString,  # LPCWSTR optional
    ahkeys: pointer,  # HKEY* optional
    ckeys: uint32,  # DWORD
    pclsidDefault: ptr GUID,  # GUID* optional
    pdtobj: pointer,  # IDataObject*
    psb: pointer,  # IShellBrowser* optional
    pStartPage: WideCString  # LPCWSTR optional
): int32 {.importc: "SHOpenPropSheetW", stdcall, dynlib: "SHELL32.dll".}
# Unicode(-W): WideCString は newWideCString("...") で生成。
pragma(lib, "shell32");
extern(Windows)
int SHOpenPropSheetW(
    const(wchar)* pszCaption,   // LPCWSTR optional
    void* ahkeys,   // HKEY* optional
    uint ckeys,   // DWORD
    GUID* pclsidDefault,   // GUID* optional
    void* pdtobj,   // IDataObject*
    void* psb,   // IShellBrowser* optional
    const(wchar)* pStartPage   // LPCWSTR optional
);
ccall((:SHOpenPropSheetW, "SHELL32.dll"), stdcall, Int32,
      (Cwstring, Ptr{Cvoid}, UInt32, Ptr{GUID}, Ptr{Cvoid}, Ptr{Cvoid}, Cwstring),
      pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
# pszCaption : LPCWSTR optional -> Cwstring
# ahkeys : HKEY* optional -> Ptr{Cvoid}
# ckeys : DWORD -> UInt32
# pclsidDefault : GUID* optional -> Ptr{GUID}
# pdtobj : IDataObject* -> Ptr{Cvoid}
# psb : IShellBrowser* optional -> Ptr{Cvoid}
# pStartPage : LPCWSTR optional -> Cwstring
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
# Unicode(-W): Cwstring には transcode(UInt16, "...") 等で UTF-16 を渡す。
local ffi = require("ffi")
ffi.cdef[[
int32_t SHOpenPropSheetW(
    const uint16_t* pszCaption,
    void* ahkeys,
    uint32_t ckeys,
    void* pclsidDefault,
    void* pdtobj,
    void* psb,
    const uint16_t* pStartPage);
]]
local shell32 = ffi.load("shell32")
-- shell32.SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
-- pszCaption : LPCWSTR optional
-- ahkeys : HKEY* optional
-- ckeys : DWORD
-- pclsidDefault : GUID* optional
-- pdtobj : IDataObject*
-- psb : IShellBrowser* optional
-- pStartPage : LPCWSTR optional
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
-- Unicode(-W): uint16_t* には UTF-16LE のバッファ(ffi.new("uint16_t[?]", ...))を渡す。
const koffi = require('koffi');
const lib = koffi.load('SHELL32.dll');
const SHOpenPropSheetW = lib.func('__stdcall', 'SHOpenPropSheetW', 'int32_t', ['str16', 'void *', 'uint32_t', 'void *', 'void *', 'void *', 'str16']);
// SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
// pszCaption : LPCWSTR optional -> 'str16'
// ahkeys : HKEY* optional -> 'void *'
// ckeys : DWORD -> 'uint32_t'
// pclsidDefault : GUID* optional -> 'void *'
// pdtobj : IDataObject* -> 'void *'
// psb : IShellBrowser* optional -> 'void *'
// pStartPage : LPCWSTR optional -> 'str16'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
const lib = Deno.dlopen("SHELL32.dll", {
  SHOpenPropSheetW: { parameters: ["buffer", "pointer", "u32", "pointer", "pointer", "pointer", "buffer"], result: "i32" },
});
// lib.symbols.SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage)
// pszCaption : LPCWSTR optional -> "buffer"
// ahkeys : HKEY* optional -> "pointer"
// ckeys : DWORD -> "u32"
// pclsidDefault : GUID* optional -> "pointer"
// pdtobj : IDataObject* -> "pointer"
// psb : IShellBrowser* optional -> "pointer"
// pStartPage : LPCWSTR optional -> "buffer"
// 文字列は "buffer"。Unicode(-W) は new TextEncoder() ではなく UTF-16LE のバイト列(末尾に \x00\x00)を Uint8Array で渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
int32_t SHOpenPropSheetW(
    const uint16_t* pszCaption,
    void* ahkeys,
    uint32_t ckeys,
    void* pclsidDefault,
    void* pdtobj,
    void* psb,
    const uint16_t* pStartPage);
C, "SHELL32.dll");
// $ffi->SHOpenPropSheetW(pszCaption, ahkeys, ckeys, pclsidDefault, pdtobj, psb, pStartPage);
// pszCaption : LPCWSTR optional
// ahkeys : HKEY* optional
// ckeys : DWORD
// pclsidDefault : GUID* optional
// pdtobj : IDataObject*
// psb : IShellBrowser* optional
// pStartPage : LPCWSTR optional
// 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
// WINAPI(stdcall): x64 では呼出規約が統一されるため問題なし。x86 では __stdcall 対応のラッパが必要な場合あり。
import com.sun.jna.*;
import com.sun.jna.ptr.*;
import com.sun.jna.win32.StdCallLibrary;
import com.sun.jna.win32.W32APIOptions;

public interface Shell32 extends StdCallLibrary {
    Shell32 INSTANCE = Native.load("shell32", Shell32.class, W32APIOptions.UNICODE_OPTIONS);
    boolean SHOpenPropSheetW(
        WString pszCaption,   // LPCWSTR optional
        Pointer ahkeys,   // HKEY* optional
        int ckeys,   // DWORD
        Pointer pclsidDefault,   // GUID* optional
        Pointer pdtobj,   // IDataObject*
        Pointer psb,   // IShellBrowser* optional
        WString pStartPage   // LPCWSTR optional
    );
}
// Unicode(-W): WString(入力)/char[](出力)で UTF-16 をマーシャリング。
@[Link("shell32")]
lib LibSHELL32
  fun SHOpenPropSheetW = SHOpenPropSheetW(
    pszCaption : UInt16*,   # LPCWSTR optional
    ahkeys : Void*,   # HKEY* optional
    ckeys : UInt32,   # DWORD
    pclsidDefault : GUID*,   # GUID* optional
    pdtobj : Void*,   # IDataObject*
    psb : Void*,   # IShellBrowser* optional
    pStartPage : UInt16*   # LPCWSTR optional
  ) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef SHOpenPropSheetWNative = Int32 Function(Pointer<Utf16>, Pointer<Void>, Uint32, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Utf16>);
typedef SHOpenPropSheetWDart = int Function(Pointer<Utf16>, Pointer<Void>, int, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Utf16>);
final SHOpenPropSheetW = DynamicLibrary.open('SHELL32.dll')
    .lookupFunction<SHOpenPropSheetWNative, SHOpenPropSheetWDart>('SHOpenPropSheetW');
// pszCaption : LPCWSTR optional -> Pointer<Utf16>
// ahkeys : HKEY* optional -> Pointer<Void>
// ckeys : DWORD -> Uint32
// pclsidDefault : GUID* optional -> Pointer<Void>
// pdtobj : IDataObject* -> Pointer<Void>
// psb : IShellBrowser* optional -> Pointer<Void>
// pStartPage : LPCWSTR optional -> Pointer<Utf16>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function SHOpenPropSheetW(
  pszCaption: PWideChar;   // LPCWSTR optional
  ahkeys: Pointer;   // HKEY* optional
  ckeys: DWORD;   // DWORD
  pclsidDefault: PGUID;   // GUID* optional
  pdtobj: Pointer;   // IDataObject*
  psb: Pointer;   // IShellBrowser* optional
  pStartPage: PWideChar   // LPCWSTR optional
): BOOL; stdcall;
  external 'SHELL32.dll' name 'SHOpenPropSheetW';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "SHOpenPropSheetW"
  c_SHOpenPropSheetW :: CWString -> Ptr () -> Word32 -> Ptr () -> Ptr () -> Ptr () -> CWString -> IO CInt
-- pszCaption : LPCWSTR optional -> CWString
-- ahkeys : HKEY* optional -> Ptr ()
-- ckeys : DWORD -> Word32
-- pclsidDefault : GUID* optional -> Ptr ()
-- pdtobj : IDataObject* -> Ptr ()
-- psb : IShellBrowser* optional -> Ptr ()
-- pStartPage : LPCWSTR optional -> CWString
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let shopenpropsheetw =
  foreign "SHOpenPropSheetW"
    ((ptr uint16_t) @-> (ptr void) @-> uint32_t @-> (ptr void) @-> (ptr void) @-> (ptr void) @-> (ptr uint16_t) @-> returning int32_t)
(* pszCaption : LPCWSTR optional -> (ptr uint16_t) *)
(* ahkeys : HKEY* optional -> (ptr void) *)
(* ckeys : DWORD -> uint32_t *)
(* pclsidDefault : GUID* optional -> (ptr void) *)
(* pdtobj : IDataObject* -> (ptr void) *)
(* psb : IShellBrowser* optional -> (ptr void) *)
(* pStartPage : LPCWSTR optional -> (ptr uint16_t) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library shell32 (t "SHELL32.dll"))
(cffi:use-foreign-library shell32)

(cffi:defcfun ("SHOpenPropSheetW" shopen-prop-sheet-w :convention :stdcall) :int32
  (psz-caption (:string :encoding :utf-16le))   ; LPCWSTR optional
  (ahkeys :pointer)   ; HKEY* optional
  (ckeys :uint32)   ; DWORD
  (pclsid-default :pointer)   ; GUID* optional
  (pdtobj :pointer)   ; IDataObject*
  (psb :pointer)   ; IShellBrowser* optional
  (p-start-page (:string :encoding :utf-16le)))   ; LPCWSTR optional
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $SHOpenPropSheetW = Win32::API::More->new('SHELL32',
    'BOOL SHOpenPropSheetW(LPCWSTR pszCaption, HANDLE ahkeys, DWORD ckeys, LPVOID pclsidDefault, LPVOID pdtobj, LPVOID psb, LPCWSTR pStartPage)');
# my $ret = $SHOpenPropSheetW->Call($pszCaption, $ahkeys, $ckeys, $pclsidDefault, $pdtobj, $psb, $pStartPage);
# pszCaption : LPCWSTR optional -> LPCWSTR
# ahkeys : HKEY* optional -> HANDLE
# ckeys : DWORD -> DWORD
# pclsidDefault : GUID* optional -> LPVOID
# pdtobj : IDataObject* -> LPVOID
# psb : IShellBrowser* optional -> LPVOID
# pStartPage : LPCWSTR optional -> LPCWSTR
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# Unicode(-W): LPCWSTR/LPWSTR は Win32::API が UTF-16 変換を行う。

関連項目

使用する型