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

CreateDialogIndirectParamW

関数
メモリ上のテンプレートからモードレスダイアログを生成する(Unicode)。
DLLUSER32.dll文字セットUnicode (-W)呼出規約winapiSetLastErrorあり対応OSWindows 2000 以降

シグネチャ

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

HWND CreateDialogIndirectParamW(
    HINSTANCE hInstance,   // optional
    DLGTEMPLATE* lpTemplate,
    HWND hWndParent,   // optional
    DLGPROC lpDialogFunc,   // optional
    LPARAM dwInitParam
);

パラメーター

名前方向説明
hInstanceHINSTANCEinoptionalダイアログボックステンプレートを含むモジュールへのハンドル。このパラメーターが NULL の場合は、現在の実行可能ファイルが使用されます。
lpTemplateDLGTEMPLATE*in

CreateDialogIndirectParam がダイアログボックスの作成に使用するテンプレート。ダイアログボックステンプレートは、ダイアログボックスを記述するヘッダーと、それに続く 1 つ以上のデータブロック(ダイアログボックス内の各コントロールを記述するもの)で構成されます。テンプレートには標準形式または拡張形式のいずれかを使用できます。

標準テンプレートでは、ヘッダーは DLGTEMPLATE 構造体に続いて追加の可変長配列が並びます。各コントロールのデータは DLGITEMTEMPLATE 構造体に続いて追加の可変長配列が並びます。

拡張ダイアログボックステンプレートでは、ヘッダーは DLGTEMPLATEEX 形式を使用し、コントロール定義は DLGITEMTEMPLATEEX 形式を使用します。

CreateDialogIndirectParam が戻った後、テンプレートは解放できます。テンプレートはダイアログボックスを起動するためにのみ使用されます。

hWndParentHWNDinoptionalダイアログボックスを所有するウィンドウへのハンドル。
lpDialogFuncDLGPROCinoptionalダイアログボックスプロシージャへのポインター。ダイアログボックスプロシージャの詳細については、DialogProc を参照してください。
dwInitParamLPARAMinWM_INITDIALOG メッセージの lParam パラメーターでダイアログボックスに渡す値。

戻り値の型: HWND

公式ドキュメント

メモリ上のダイアログボックステンプレートからモードレスダイアログボックスを作成します。(Unicode)

戻り値

型: HWND

関数が成功した場合、戻り値はダイアログボックスのウィンドウハンドルです。

関数が失敗した場合、戻り値は NULL です。詳細なエラー情報を取得するには、GetLastError を呼び出します。

解説(Remarks)

CreateDialogIndirectParam 関数は CreateWindowEx 関数を使用してダイアログボックスを作成します。その後、CreateDialogIndirectParam はダイアログボックスプロシージャに WM_INITDIALOG メッセージを送信します。テンプレートで DS_SETFONT または DS_SHELLFONT スタイルが指定されている場合、この関数はダイアログボックスプロシージャに WM_SETFONT メッセージも送信します。テンプレートで WS_VISIBLE スタイルが指定されている場合、この関数はダイアログボックスを表示します。最後に、CreateDialogIndirectParam はダイアログボックスのウィンドウハンドルを返します。

CreateDialogIndirectParam が戻った後、ShowWindow 関数を使用してダイアログボックスを表示できます(まだ表示されていない場合)。ダイアログボックスを破棄するには、DestroyWindow 関数を使用します。キーボードナビゲーションやその他のダイアログボックス機能をサポートするには、ダイアログボックスのメッセージループで IsDialogMessage 関数を呼び出す必要があります。

標準ダイアログボックステンプレートでは、DLGTEMPLATE 構造体と各 DLGITEMTEMPLATE 構造体は DWORD 境界に配置する必要があります。DLGITEMTEMPLATE 構造体に続く作成データ配列も DWORD 境界に配置する必要があります。テンプレート内のその他のすべての可変長配列は WORD 境界に配置する必要があります。

拡張ダイアログボックステンプレートでは、DLGTEMPLATEEX ヘッダーと各 DLGITEMTEMPLATEEX コントロール定義は DWORD 境界に配置する必要があります。DLGITEMTEMPLATEEX 構造体に続く作成データ配列がある場合、それも DWORD 境界に配置する必要があります。テンプレート内のその他のすべての可変長配列は WORD 境界に配置する必要があります。

ダイアログボックステンプレート内のすべての文字列(ダイアログボックスやボタンのタイトルなど)は Unicode 文字列でなければなりません。

メモ

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

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

各言語での呼び出し定義

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

HWND CreateDialogIndirectParamW(
    HINSTANCE hInstance,   // optional
    DLGTEMPLATE* lpTemplate,
    HWND hWndParent,   // optional
    DLGPROC lpDialogFunc,   // optional
    LPARAM dwInitParam
);
[DllImport("USER32.dll", CharSet = CharSet.Unicode, SetLastError = true, ExactSpelling = true)]
static extern IntPtr CreateDialogIndirectParamW(
    IntPtr hInstance,   // HINSTANCE optional
    IntPtr lpTemplate,   // DLGTEMPLATE*
    IntPtr hWndParent,   // HWND optional
    IntPtr lpDialogFunc,   // DLGPROC optional
    IntPtr dwInitParam   // LPARAM
);
<DllImport("USER32.dll", CharSet:=CharSet.Unicode, SetLastError:=True, ExactSpelling:=True)>
Public Shared Function CreateDialogIndirectParamW(
    hInstance As IntPtr,   ' HINSTANCE optional
    lpTemplate As IntPtr,   ' DLGTEMPLATE*
    hWndParent As IntPtr,   ' HWND optional
    lpDialogFunc As IntPtr,   ' DLGPROC optional
    dwInitParam As IntPtr   ' LPARAM
) As IntPtr
End Function
' hInstance : HINSTANCE optional
' lpTemplate : DLGTEMPLATE*
' hWndParent : HWND optional
' lpDialogFunc : DLGPROC optional
' dwInitParam : LPARAM
Declare PtrSafe Function CreateDialogIndirectParamW Lib "user32" ( _
    ByVal hInstance As LongPtr, _
    ByVal lpTemplate As LongPtr, _
    ByVal hWndParent As LongPtr, _
    ByVal lpDialogFunc As LongPtr, _
    ByVal dwInitParam As LongPtr) As LongPtr
' 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

CreateDialogIndirectParamW = ctypes.windll.user32.CreateDialogIndirectParamW
CreateDialogIndirectParamW.restype = ctypes.c_void_p
CreateDialogIndirectParamW.argtypes = [
    wintypes.HANDLE,  # hInstance : HINSTANCE optional
    ctypes.c_void_p,  # lpTemplate : DLGTEMPLATE*
    wintypes.HANDLE,  # hWndParent : HWND optional
    ctypes.c_void_p,  # lpDialogFunc : DLGPROC optional
    ctypes.c_ssize_t,  # dwInitParam : LPARAM
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('USER32.dll')
CreateDialogIndirectParamW = Fiddle::Function.new(
  lib['CreateDialogIndirectParamW'],
  [
    Fiddle::TYPE_VOIDP,  # hInstance : HINSTANCE optional
    Fiddle::TYPE_VOIDP,  # lpTemplate : DLGTEMPLATE*
    Fiddle::TYPE_VOIDP,  # hWndParent : HWND optional
    Fiddle::TYPE_VOIDP,  # lpDialogFunc : DLGPROC optional
    Fiddle::TYPE_INTPTR_T,  # dwInitParam : LPARAM
  ],
  Fiddle::TYPE_VOIDP)
# Wide strings: pass str.encode("UTF-16LE") + "\x00\x00"
#[link(name = "user32")]
extern "system" {
    fn CreateDialogIndirectParamW(
        hInstance: *mut core::ffi::c_void,  // HINSTANCE optional
        lpTemplate: *mut DLGTEMPLATE,  // DLGTEMPLATE*
        hWndParent: *mut core::ffi::c_void,  // HWND optional
        lpDialogFunc: *const core::ffi::c_void,  // DLGPROC optional
        dwInitParam: isize  // LPARAM
    ) -> *mut core::ffi::c_void;
}
// crates: windows-sys provides ready-made bindings for this API.
$sig = @"
[DllImport("USER32.dll", CharSet = CharSet.Unicode, SetLastError = true)]
public static extern IntPtr CreateDialogIndirectParamW(IntPtr hInstance, IntPtr lpTemplate, IntPtr hWndParent, IntPtr lpDialogFunc, IntPtr dwInitParam);
"@
$api = Add-Type -MemberDefinition $sig -Name 'USER32_CreateDialogIndirectParamW' -Namespace Win32 -PassThru
# $api::CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
#uselib "USER32.dll"
#func global CreateDialogIndirectParamW "CreateDialogIndirectParamW" wptr, wptr, wptr, wptr, wptr
; CreateDialogIndirectParamW hInstance, varptr(lpTemplate), hWndParent, lpDialogFunc, dwInitParam   ; 戻り値は stat
; hInstance : HINSTANCE optional -> "wptr"
; lpTemplate : DLGTEMPLATE* -> "wptr"
; hWndParent : HWND optional -> "wptr"
; lpDialogFunc : DLGPROC optional -> "wptr"
; dwInitParam : LPARAM -> "wptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数:
#uselib "USER32.dll"
#cfunc global CreateDialogIndirectParamW "CreateDialogIndirectParamW" sptr, var, sptr, sptr, sptr
; res = CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
; hInstance : HINSTANCE optional -> "sptr"
; lpTemplate : DLGTEMPLATE* -> "var"
; hWndParent : HWND optional -> "sptr"
; lpDialogFunc : DLGPROC optional -> "sptr"
; dwInitParam : LPARAM -> "sptr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数:
; HWND CreateDialogIndirectParamW(HINSTANCE hInstance, DLGTEMPLATE* lpTemplate, HWND hWndParent, DLGPROC lpDialogFunc, LPARAM dwInitParam)
#uselib "USER32.dll"
#cfunc global CreateDialogIndirectParamW "CreateDialogIndirectParamW" intptr, var, intptr, intptr, intptr
; res = CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
; hInstance : HINSTANCE optional -> "intptr"
; lpTemplate : DLGTEMPLATE* -> "var"
; hWndParent : HWND optional -> "intptr"
; lpDialogFunc : DLGPROC optional -> "intptr"
; dwInitParam : LPARAM -> "intptr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	user32 = windows.NewLazySystemDLL("USER32.dll")
	procCreateDialogIndirectParamW = user32.NewProc("CreateDialogIndirectParamW")
)

// hInstance (HINSTANCE optional), lpTemplate (DLGTEMPLATE*), hWndParent (HWND optional), lpDialogFunc (DLGPROC optional), dwInitParam (LPARAM)
r1, _, err := procCreateDialogIndirectParamW.Call(
	uintptr(hInstance),
	uintptr(lpTemplate),
	uintptr(hWndParent),
	uintptr(lpDialogFunc),
	uintptr(dwInitParam),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // HWND
function CreateDialogIndirectParamW(
  hInstance: THandle;   // HINSTANCE optional
  lpTemplate: Pointer;   // DLGTEMPLATE*
  hWndParent: THandle;   // HWND optional
  lpDialogFunc: Pointer;   // DLGPROC optional
  dwInitParam: NativeInt   // LPARAM
): THandle; stdcall;
  external 'USER32.dll' name 'CreateDialogIndirectParamW';
result := DllCall("USER32\CreateDialogIndirectParamW"
    , "Ptr", hInstance   ; HINSTANCE optional
    , "Ptr", lpTemplate   ; DLGTEMPLATE*
    , "Ptr", hWndParent   ; HWND optional
    , "Ptr", lpDialogFunc   ; DLGPROC optional
    , "Ptr", dwInitParam   ; LPARAM
    , "Ptr")   ; return: HWND
●CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam) = DLL("USER32.dll", "void* CreateDialogIndirectParamW(void*, void*, void*, void*, int)")
# 呼び出し: CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
# hInstance : HINSTANCE optional -> "void*"
# lpTemplate : DLGTEMPLATE* -> "void*"
# hWndParent : HWND optional -> "void*"
# lpDialogFunc : DLGPROC optional -> "void*"
# dwInitParam : LPARAM -> "int"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
# ※-W(Unicode)関数。なでしこ1はANSIのため -A 版の利用を推奨。
const std = @import("std");

extern "user32" fn CreateDialogIndirectParamW(
    hInstance: ?*anyopaque, // HINSTANCE optional
    lpTemplate: [*c]DLGTEMPLATE, // DLGTEMPLATE*
    hWndParent: ?*anyopaque, // HWND optional
    lpDialogFunc: ?*anyopaque, // DLGPROC optional
    dwInitParam: isize // LPARAM
) callconv(std.os.windows.WINAPI) ?*anyopaque;
// Unicode(-W): UTF-16LE のヌル終端バッファ([*c]const u16)を渡す。
proc CreateDialogIndirectParamW(
    hInstance: pointer,  # HINSTANCE optional
    lpTemplate: ptr DLGTEMPLATE,  # DLGTEMPLATE*
    hWndParent: pointer,  # HWND optional
    lpDialogFunc: pointer,  # DLGPROC optional
    dwInitParam: int  # LPARAM
): pointer {.importc: "CreateDialogIndirectParamW", stdcall, dynlib: "USER32.dll".}
# Unicode(-W): WideCString は newWideCString("...") で生成。
pragma(lib, "user32");
extern(Windows)
void* CreateDialogIndirectParamW(
    void* hInstance,   // HINSTANCE optional
    DLGTEMPLATE* lpTemplate,   // DLGTEMPLATE*
    void* hWndParent,   // HWND optional
    void* lpDialogFunc,   // DLGPROC optional
    ptrdiff_t dwInitParam   // LPARAM
);
ccall((:CreateDialogIndirectParamW, "USER32.dll"), stdcall, Ptr{Cvoid},
      (Ptr{Cvoid}, Ptr{DLGTEMPLATE}, Ptr{Cvoid}, Ptr{Cvoid}, Int),
      hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
# hInstance : HINSTANCE optional -> Ptr{Cvoid}
# lpTemplate : DLGTEMPLATE* -> Ptr{DLGTEMPLATE}
# hWndParent : HWND optional -> Ptr{Cvoid}
# lpDialogFunc : DLGPROC optional -> Ptr{Cvoid}
# dwInitParam : LPARAM -> Int
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
# Unicode(-W): Cwstring には transcode(UInt16, "...") 等で UTF-16 を渡す。
local ffi = require("ffi")
ffi.cdef[[
void* CreateDialogIndirectParamW(
    void* hInstance,
    void* lpTemplate,
    void* hWndParent,
    void* lpDialogFunc,
    intptr_t dwInitParam);
]]
local user32 = ffi.load("user32")
-- user32.CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
-- hInstance : HINSTANCE optional
-- lpTemplate : DLGTEMPLATE*
-- hWndParent : HWND optional
-- lpDialogFunc : DLGPROC optional
-- dwInitParam : LPARAM
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
-- Unicode(-W): uint16_t* には UTF-16LE のバッファ(ffi.new("uint16_t[?]", ...))を渡す。
const koffi = require('koffi');
const lib = koffi.load('USER32.dll');
const CreateDialogIndirectParamW = lib.func('__stdcall', 'CreateDialogIndirectParamW', 'void *', ['void *', 'void *', 'void *', 'void *', 'intptr_t']);
// CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
// hInstance : HINSTANCE optional -> 'void *'
// lpTemplate : DLGTEMPLATE* -> 'void *'
// hWndParent : HWND optional -> 'void *'
// lpDialogFunc : DLGPROC optional -> 'void *'
// dwInitParam : LPARAM -> 'intptr_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
// コールバック(関数ポインタ)は koffi.proto/koffi.register で型を定義して渡す(素の void* では JS 関数を渡せない)。
const lib = Deno.dlopen("USER32.dll", {
  CreateDialogIndirectParamW: { parameters: ["pointer", "pointer", "pointer", "pointer", "isize"], result: "pointer" },
});
// lib.symbols.CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam)
// hInstance : HINSTANCE optional -> "pointer"
// lpTemplate : DLGTEMPLATE* -> "pointer"
// hWndParent : HWND optional -> "pointer"
// lpDialogFunc : DLGPROC optional -> "pointer"
// dwInitParam : LPARAM -> "isize"
// 文字列は "buffer"。Unicode(-W) は new TextEncoder() ではなく UTF-16LE のバイト列(末尾に \x00\x00)を Uint8Array で渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
void* CreateDialogIndirectParamW(
    void* hInstance,
    void* lpTemplate,
    void* hWndParent,
    void* lpDialogFunc,
    intptr_t dwInitParam);
C, "USER32.dll");
// $ffi->CreateDialogIndirectParamW(hInstance, lpTemplate, hWndParent, lpDialogFunc, dwInitParam);
// hInstance : HINSTANCE optional
// lpTemplate : DLGTEMPLATE*
// hWndParent : HWND optional
// lpDialogFunc : DLGPROC optional
// dwInitParam : LPARAM
// 構造体/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 User32 extends StdCallLibrary {
    User32 INSTANCE = Native.load("user32", User32.class, W32APIOptions.UNICODE_OPTIONS);
    Pointer CreateDialogIndirectParamW(
        Pointer hInstance,   // HINSTANCE optional
        Pointer lpTemplate,   // DLGTEMPLATE*
        Pointer hWndParent,   // HWND optional
        Callback lpDialogFunc,   // DLGPROC optional
        long dwInitParam   // LPARAM
    );
}
// Unicode(-W): WString(入力)/char[](出力)で UTF-16 をマーシャリング。
@[Link("user32")]
lib LibUSER32
  fun CreateDialogIndirectParamW = CreateDialogIndirectParamW(
    hInstance : Void*,   # HINSTANCE optional
    lpTemplate : DLGTEMPLATE*,   # DLGTEMPLATE*
    hWndParent : Void*,   # HWND optional
    lpDialogFunc : Void*,   # DLGPROC optional
    dwInitParam : LibC::SSizeT   # LPARAM
  ) : Void*
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef CreateDialogIndirectParamWNative = Pointer<Void> Function(Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Void>, IntPtr);
typedef CreateDialogIndirectParamWDart = Pointer<Void> Function(Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Void>, int);
final CreateDialogIndirectParamW = DynamicLibrary.open('USER32.dll')
    .lookupFunction<CreateDialogIndirectParamWNative, CreateDialogIndirectParamWDart>('CreateDialogIndirectParamW');
// hInstance : HINSTANCE optional -> Pointer<Void>
// lpTemplate : DLGTEMPLATE* -> Pointer<Void>
// hWndParent : HWND optional -> Pointer<Void>
// lpDialogFunc : DLGPROC optional -> Pointer<Void>
// dwInitParam : LPARAM -> IntPtr
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function CreateDialogIndirectParamW(
  hInstance: THandle;   // HINSTANCE optional
  lpTemplate: Pointer;   // DLGTEMPLATE*
  hWndParent: THandle;   // HWND optional
  lpDialogFunc: Pointer;   // DLGPROC optional
  dwInitParam: NativeInt   // LPARAM
): THandle; stdcall;
  external 'USER32.dll' name 'CreateDialogIndirectParamW';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "CreateDialogIndirectParamW"
  c_CreateDialogIndirectParamW :: Ptr () -> Ptr () -> Ptr () -> Ptr () -> CIntPtr -> IO (Ptr ())
-- hInstance : HINSTANCE optional -> Ptr ()
-- lpTemplate : DLGTEMPLATE* -> Ptr ()
-- hWndParent : HWND optional -> Ptr ()
-- lpDialogFunc : DLGPROC optional -> Ptr ()
-- dwInitParam : LPARAM -> CIntPtr
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let createdialogindirectparamw =
  foreign "CreateDialogIndirectParamW"
    ((ptr void) @-> (ptr void) @-> (ptr void) @-> (ptr void) @-> intptr_t @-> returning (ptr void))
(* hInstance : HINSTANCE optional -> (ptr void) *)
(* lpTemplate : DLGTEMPLATE* -> (ptr void) *)
(* hWndParent : HWND optional -> (ptr void) *)
(* lpDialogFunc : DLGPROC optional -> (ptr void) *)
(* dwInitParam : LPARAM -> intptr_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library user32 (t "USER32.dll"))
(cffi:use-foreign-library user32)

(cffi:defcfun ("CreateDialogIndirectParamW" create-dialog-indirect-param-w :convention :stdcall) :pointer
  (h-instance :pointer)   ; HINSTANCE optional
  (lp-template :pointer)   ; DLGTEMPLATE*
  (h-wnd-parent :pointer)   ; HWND optional
  (lp-dialog-func :pointer)   ; DLGPROC optional
  (dw-init-param :int64))   ; LPARAM
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $CreateDialogIndirectParamW = Win32::API::More->new('USER32',
    'HANDLE CreateDialogIndirectParamW(HANDLE hInstance, LPVOID lpTemplate, HANDLE hWndParent, LPVOID lpDialogFunc, LPARAM dwInitParam)');
# my $ret = $CreateDialogIndirectParamW->Call($hInstance, $lpTemplate, $hWndParent, $lpDialogFunc, $dwInitParam);
# hInstance : HINSTANCE optional -> HANDLE
# lpTemplate : DLGTEMPLATE* -> LPVOID
# hWndParent : HWND optional -> HANDLE
# lpDialogFunc : DLGPROC optional -> LPVOID
# dwInitParam : LPARAM -> LPARAM
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# コールバック(関数ポインタ)は Perl sub を直接渡せません。Win32::API::Callback を使用してください。
# Unicode(-W): LPCWSTR/LPWSTR は Win32::API が UTF-16 変換を行う。

関連項目

文字セット違い
公式の関連項目
使用する型