ホーム › UI.Accessibility › SetWinEventHook

SetWinEventHook

関数

指定範囲のWinEventを受け取るフックを設定する。

DLLUSER32.dll呼出規約winapi対応OSWindows 2000 以降

シグネチャ

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

HWINEVENTHOOK SetWinEventHook(
    DWORD eventMin,
    DWORD eventMax,
    HMODULE hmodWinEventProc,   // optional
    WINEVENTPROC pfnWinEventProc,
    DWORD idProcess,
    DWORD idThread,
    DWORD dwFlags
);

パラメーター

名前

型

方向

説明

eventMin

DWORD

フック関数が処理するイベント範囲のうち、最も低いイベント値を示すイベント定数を指定します。このパラメーターには EVENT_MIN を設定して、指定可能な最も低いイベント値を示すことができます。

eventMax

DWORD

フック関数が処理するイベント範囲のうち、最も高いイベント値を示すイベント定数を指定します。このパラメーターには EVENT_MAX を設定して、指定可能な最も高いイベント値を示すことができます。

hmodWinEventProc

HMODULE

inoptional

dwFlags パラメーターに WINEVENT_INCONTEXT フラグを指定した場合は、lpfnWinEventProc が指すフック関数を含む DLL のハンドル。フック関数が DLL 内にない場合、または WINEVENT_OUTOFCONTEXT フラグを指定した場合、このパラメーターは NULL です。

pfnWinEventProc

WINEVENTPROC

イベントフック関数へのポインター。この関数の詳細については、WinEventProc を参照してください。

idProcess

DWORD

フック関数がイベントを受け取る対象となるプロセスの ID を指定します。現在のデスクトップ上のすべてのプロセスからイベントを受け取るには、0 を指定します。

idThread

DWORD

フック関数がイベントを受け取る対象となるスレッドの ID を指定します。このパラメーターが 0 の場合、フック関数は現在のデスクトップ上の既存のすべてのスレッドに関連付けられます。

dwFlags

DWORD

フック関数の場所と、スキップするイベントを指定するフラグ値。次のフラグが有効です。

値	意味
WINEVENT_INCONTEXT	コールバック関数を含む DLL が、イベントを生成するプロセスのアドレス空間にマップされます。このフラグを指定すると、システムはイベントの発生時にコールバック関数へイベント通知を送ります。このフラグを指定する場合、フック関数は DLL 内になければなりません。呼び出し元プロセスとイベント生成側プロセスの両方が 32 ビットまたは 64 ビットのプロセスでない場合、あるいはイベント生成側プロセスがコンソールアプリケーションである場合、このフラグは効果がありません。詳細については、In-Context Hook Functions を参照してください。
WINEVENT_OUTOFCONTEXT	コールバック関数は、イベントを生成するプロセスのアドレス空間にマップされません。フック関数はプロセス境界をまたいで呼び出されるため、システムはイベントをキューに入れる必要があります。この方法は非同期ですが、イベントの順序は保証されます。詳細については、Out-of-Context Hook Functions を参照してください。
WINEVENT_SKIPOWNPROCESS	このフックのインスタンスが、このプロセス内のスレッドによって生成されたイベントを受け取らないようにします。このフラグは、スレッドがイベントを生成すること自体を妨げるものではありません。
WINEVENT_SKIPOWNTHREAD	このフックのインスタンスが、このフックを登録しているスレッドによって生成されたイベントを受け取らないようにします。

次のフラグの組み合わせが有効です。

また、クライアントアプリケーションは WINEVENT_INCONTEXT または WINEVENT_OUTOFCONTEXT を単独で指定することもできます。

Windows ストアアプリ開発については、「解説」セクションを参照してください。

戻り値の型: HWINEVENTHOOK

公式ドキュメント

指定した範囲のイベントに対するイベントフック関数を設定します。

戻り値

Type: HWINEVENTHOOK

成功した場合は、このイベントフックインスタンスを識別する HWINEVENTHOOK 値を返します。アプリケーションは、この戻り値を UnhookWinEvent 関数で使用するために保存します。

失敗した場合は 0 を返します。

解説(Remarks)

この関数を使用すると、クライアントは対象とするプロセスおよびスレッドを指定できます。

idProcess パラメーターが 0 以外で idThread が 0 の場合、フック関数はそのプロセス内のすべてのスレッドから、指定されたイベントを受け取ります。idProcess パラメーターが 0 で idThread が 0 以外の場合、フック関数は idThread で指定されたスレッドからのみ、指定されたイベントを受け取ります。どちらも 0 の場合、フック関数はすべてのスレッドおよびプロセスから、指定されたイベントを受け取ります。

クライアントは、フック関数を追加で登録したり、追加のイベントをリッスンしたりする場合、SetWinEventHook を複数回呼び出すことができます。

SetWinEventHook を呼び出すクライアントスレッドがイベントを受け取るには、メッセージループが必要です。

マネージコードで SetWinEventHook を使用してコールバックを設定する場合は、例外を回避するために GCHandle 構造体を使用してください。これにより、ガベージコレクターに対してコールバックを移動しないよう指示できます。

コンテキスト外 (out-of-context) のイベントは、SetWinEventHook を呼び出したスレッドと同じスレッドで配信されます。WINEVENT_INCONTEXT イベントを要求した場合でも、状況によってはイベントがコンテキスト外で配信されることがあります。たとえば、コンソールウィンドウからのイベントや、呼び出し元とビット数 (64 ビットと 32 ビット) が異なるプロセスからのイベントがこれに該当します。

フック関数がイベントを処理している間に別のイベントが発生し、元のイベントの処理が完了する前にフック関数が再入することがあります。フック関数における再入の問題は、フック関数側でこの状況に対処しない限り、イベントの完了順序が入れ替わってしまう点にあります。詳細については、Guarding Against Reentrancy を参照してください。

Windows ストアアプリ開発 dwFlags が WINEVENT_INCONTEXT で、かつ (idProcess = 0 | idThread = 0) の場合、ウィンドウフック DLL は、UIAccess プロセス (アクセシビリティツール) によってインストールされたものでない限り、Windows ストアアプリのプロセスおよび Windows ランタイムブローカープロセスにはインプロセスで読み込まれません。通知は、インストールした側のスレッドで配信されます。

この動作は、フック DLL とターゲットアプリケーションのプロセスとの間でアーキテクチャが一致しない場合 (たとえば、フック DLL が 32 ビットでアプリケーションプロセスが 64 ビットの場合) の動作と同様です。

例

次のサンプルコードは、クライアントアプリケーションがメニュー開始イベントとメニュー終了イベントをリッスンする方法を示しています。簡単にするため、イベントハンドラーは情報を標準出力に出力するだけです。


// グローバル変数。
HWINEVENTHOOK g_hook;

// COM を初期化し、イベントフックを設定します。
//
void InitializeMSAA()
{
    CoInitialize(NULL);
    g_hook = SetWinEventHook(
        EVENT_SYSTEM_MENUSTART, EVENT_SYSTEM_MENUEND,  // イベントの範囲 (4 ～ 5)。
        NULL,                                          // DLL のハンドル。
        HandleWinEvent,                                // コールバック。
        0, 0,              // 対象のプロセス ID とスレッド ID (0 = すべて)
        WINEVENT_OUTOFCONTEXT | WINEVENT_SKIPOWNPROCESS); // フラグ。
}

// イベントのフックを解除し、COM を終了します。
//
void ShutdownMSAA()
{
    UnhookWinEvent(g_hook);
    CoUninitialize();
}

// イベントを処理するコールバック関数。
//
void CALLBACK HandleWinEvent(HWINEVENTHOOK hook, DWORD event, HWND hwnd, 
                             LONG idObject, LONG idChild, 
                             DWORD dwEventThread, DWORD dwmsEventTime)
{
    IAccessible* pAcc = NULL;
    VARIANT varChild;
    HRESULT hr = AccessibleObjectFromEvent(hwnd, idObject, idChild, &pAcc, &varChild);  
    if ((hr == S_OK) && (pAcc != NULL))
    {
        BSTR bstrName;
        pAcc->get_accName(varChild, &bstrName);
        if (event == EVENT_SYSTEM_MENUSTART) 
        {
            printf("Begin: ");
        }
        else if (event == EVENT_SYSTEM_MENUEND)
        {
            printf("End:   ");
        }
        printf("%S\n", bstrName);
        SysFreeString(bstrName);
        pAcc->Release();
    }
}

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

各言語での呼び出し定義

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

HWINEVENTHOOK SetWinEventHook(
    DWORD eventMin,
    DWORD eventMax,
    HMODULE hmodWinEventProc,   // optional
    WINEVENTPROC pfnWinEventProc,
    DWORD idProcess,
    DWORD idThread,
    DWORD dwFlags
);

[DllImport("USER32.dll", ExactSpelling = true)]
static extern IntPtr SetWinEventHook(
    uint eventMin,   // DWORD
    uint eventMax,   // DWORD
    IntPtr hmodWinEventProc,   // HMODULE optional
    IntPtr pfnWinEventProc,   // WINEVENTPROC
    uint idProcess,   // DWORD
    uint idThread,   // DWORD
    uint dwFlags   // DWORD
);

<DllImport("USER32.dll", ExactSpelling:=True)>
Public Shared Function SetWinEventHook(
    eventMin As UInteger,   ' DWORD
    eventMax As UInteger,   ' DWORD
    hmodWinEventProc As IntPtr,   ' HMODULE optional
    pfnWinEventProc As IntPtr,   ' WINEVENTPROC
    idProcess As UInteger,   ' DWORD
    idThread As UInteger,   ' DWORD
    dwFlags As UInteger   ' DWORD
) As IntPtr
End Function

' eventMin : DWORD
' eventMax : DWORD
' hmodWinEventProc : HMODULE optional
' pfnWinEventProc : WINEVENTPROC
' idProcess : DWORD
' idThread : DWORD
' dwFlags : DWORD
Declare PtrSafe Function SetWinEventHook Lib "user32" ( _
    ByVal eventMin As Long, _
    ByVal eventMax As Long, _
    ByVal hmodWinEventProc As LongPtr, _
    ByVal pfnWinEventProc As LongPtr, _
    ByVal idProcess As Long, _
    ByVal idThread As Long, _
    ByVal dwFlags As Long) As LongPtr
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

SetWinEventHook = ctypes.windll.user32.SetWinEventHook
SetWinEventHook.restype = ctypes.c_void_p
SetWinEventHook.argtypes = [
    wintypes.DWORD,  # eventMin : DWORD
    wintypes.DWORD,  # eventMax : DWORD
    wintypes.HANDLE,  # hmodWinEventProc : HMODULE optional
    ctypes.c_void_p,  # pfnWinEventProc : WINEVENTPROC
    wintypes.DWORD,  # idProcess : DWORD
    wintypes.DWORD,  # idThread : DWORD
    wintypes.DWORD,  # dwFlags : DWORD
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('USER32.dll')
SetWinEventHook = Fiddle::Function.new(
  lib['SetWinEventHook'],
  [
    -Fiddle::TYPE_INT,  # eventMin : DWORD
    -Fiddle::TYPE_INT,  # eventMax : DWORD
    Fiddle::TYPE_VOIDP,  # hmodWinEventProc : HMODULE optional
    Fiddle::TYPE_VOIDP,  # pfnWinEventProc : WINEVENTPROC
    -Fiddle::TYPE_INT,  # idProcess : DWORD
    -Fiddle::TYPE_INT,  # idThread : DWORD
    -Fiddle::TYPE_INT,  # dwFlags : DWORD
  ],
  Fiddle::TYPE_VOIDP)

#[link(name = "user32")]
extern "system" {
    fn SetWinEventHook(
        eventMin: u32,  // DWORD
        eventMax: u32,  // DWORD
        hmodWinEventProc: *mut core::ffi::c_void,  // HMODULE optional
        pfnWinEventProc: *const core::ffi::c_void,  // WINEVENTPROC
        idProcess: u32,  // DWORD
        idThread: u32,  // DWORD
        dwFlags: u32  // DWORD
    ) -> *mut core::ffi::c_void;
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("USER32.dll")]
public static extern IntPtr SetWinEventHook(uint eventMin, uint eventMax, IntPtr hmodWinEventProc, IntPtr pfnWinEventProc, uint idProcess, uint idThread, uint dwFlags);
"@
$api = Add-Type -MemberDefinition $sig -Name 'USER32_SetWinEventHook' -Namespace Win32 -PassThru
# $api::SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)

#uselib "USER32.dll"
#func global SetWinEventHook "SetWinEventHook" sptr, sptr, sptr, sptr, sptr, sptr, sptr
; SetWinEventHook eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags   ; 戻り値は stat
; eventMin : DWORD -> "sptr"
; eventMax : DWORD -> "sptr"
; hmodWinEventProc : HMODULE optional -> "sptr"
; pfnWinEventProc : WINEVENTPROC -> "sptr"
; idProcess : DWORD -> "sptr"
; idThread : DWORD -> "sptr"
; dwFlags : DWORD -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。

#uselib "USER32.dll"
#cfunc global SetWinEventHook "SetWinEventHook" int, int, sptr, sptr, int, int, int
; res = SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
; eventMin : DWORD -> "int"
; eventMax : DWORD -> "int"
; hmodWinEventProc : HMODULE optional -> "sptr"
; pfnWinEventProc : WINEVENTPROC -> "sptr"
; idProcess : DWORD -> "int"
; idThread : DWORD -> "int"
; dwFlags : DWORD -> "int"

; HWINEVENTHOOK SetWinEventHook(DWORD eventMin, DWORD eventMax, HMODULE hmodWinEventProc, WINEVENTPROC pfnWinEventProc, DWORD idProcess, DWORD idThread, DWORD dwFlags)
#uselib "USER32.dll"
#cfunc global SetWinEventHook "SetWinEventHook" int, int, intptr, intptr, int, int, int
; res = SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
; eventMin : DWORD -> "int"
; eventMax : DWORD -> "int"
; hmodWinEventProc : HMODULE optional -> "intptr"
; pfnWinEventProc : WINEVENTPROC -> "intptr"
; idProcess : DWORD -> "int"
; idThread : DWORD -> "int"
; dwFlags : DWORD -> "int"

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

var (
	user32 = windows.NewLazySystemDLL("USER32.dll")
	procSetWinEventHook = user32.NewProc("SetWinEventHook")
)

// eventMin (DWORD), eventMax (DWORD), hmodWinEventProc (HMODULE optional), pfnWinEventProc (WINEVENTPROC), idProcess (DWORD), idThread (DWORD), dwFlags (DWORD)
r1, _, err := procSetWinEventHook.Call(
	uintptr(eventMin),
	uintptr(eventMax),
	uintptr(hmodWinEventProc),
	uintptr(pfnWinEventProc),
	uintptr(idProcess),
	uintptr(idThread),
	uintptr(dwFlags),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // HWINEVENTHOOK

function SetWinEventHook(
  eventMin: DWORD;   // DWORD
  eventMax: DWORD;   // DWORD
  hmodWinEventProc: THandle;   // HMODULE optional
  pfnWinEventProc: Pointer;   // WINEVENTPROC
  idProcess: DWORD;   // DWORD
  idThread: DWORD;   // DWORD
  dwFlags: DWORD   // DWORD
): THandle; stdcall;
  external 'USER32.dll' name 'SetWinEventHook';

result := DllCall("USER32\SetWinEventHook"
    , "UInt", eventMin   ; DWORD
    , "UInt", eventMax   ; DWORD
    , "Ptr", hmodWinEventProc   ; HMODULE optional
    , "Ptr", pfnWinEventProc   ; WINEVENTPROC
    , "UInt", idProcess   ; DWORD
    , "UInt", idThread   ; DWORD
    , "UInt", dwFlags   ; DWORD
    , "Ptr")   ; return: HWINEVENTHOOK

●SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags) = DLL("USER32.dll", "void* SetWinEventHook(dword, dword, void*, void*, dword, dword, dword)")
# 呼び出し: SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
# eventMin : DWORD -> "dword"
# eventMax : DWORD -> "dword"
# hmodWinEventProc : HMODULE optional -> "void*"
# pfnWinEventProc : WINEVENTPROC -> "void*"
# idProcess : DWORD -> "dword"
# idThread : DWORD -> "dword"
# dwFlags : DWORD -> "dword"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。

const std = @import("std");

extern "user32" fn SetWinEventHook(
    eventMin: u32, // DWORD
    eventMax: u32, // DWORD
    hmodWinEventProc: ?*anyopaque, // HMODULE optional
    pfnWinEventProc: ?*anyopaque, // WINEVENTPROC
    idProcess: u32, // DWORD
    idThread: u32, // DWORD
    dwFlags: u32 // DWORD
) callconv(std.os.windows.WINAPI) ?*anyopaque;

proc SetWinEventHook(
    eventMin: uint32,  # DWORD
    eventMax: uint32,  # DWORD
    hmodWinEventProc: pointer,  # HMODULE optional
    pfnWinEventProc: pointer,  # WINEVENTPROC
    idProcess: uint32,  # DWORD
    idThread: uint32,  # DWORD
    dwFlags: uint32  # DWORD
): pointer {.importc: "SetWinEventHook", stdcall, dynlib: "USER32.dll".}

pragma(lib, "user32");
extern(Windows)
void* SetWinEventHook(
    uint eventMin,   // DWORD
    uint eventMax,   // DWORD
    void* hmodWinEventProc,   // HMODULE optional
    void* pfnWinEventProc,   // WINEVENTPROC
    uint idProcess,   // DWORD
    uint idThread,   // DWORD
    uint dwFlags   // DWORD
);

ccall((:SetWinEventHook, "USER32.dll"), stdcall, Ptr{Cvoid},
      (UInt32, UInt32, Ptr{Cvoid}, Ptr{Cvoid}, UInt32, UInt32, UInt32),
      eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
# eventMin : DWORD -> UInt32
# eventMax : DWORD -> UInt32
# hmodWinEventProc : HMODULE optional -> Ptr{Cvoid}
# pfnWinEventProc : WINEVENTPROC -> Ptr{Cvoid}
# idProcess : DWORD -> UInt32
# idThread : DWORD -> UInt32
# dwFlags : DWORD -> UInt32
# stdcall は 32bit のみ意味を持つ(x64 では無視)。

local ffi = require("ffi")
ffi.cdef[[
void* SetWinEventHook(
    uint32_t eventMin,
    uint32_t eventMax,
    void* hmodWinEventProc,
    void* pfnWinEventProc,
    uint32_t idProcess,
    uint32_t idThread,
    uint32_t dwFlags);
]]
local user32 = ffi.load("user32")
-- user32.SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
-- eventMin : DWORD
-- eventMax : DWORD
-- hmodWinEventProc : HMODULE optional
-- pfnWinEventProc : WINEVENTPROC
-- idProcess : DWORD
-- idThread : DWORD
-- dwFlags : DWORD
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。

const koffi = require('koffi');
const lib = koffi.load('USER32.dll');
const SetWinEventHook = lib.func('__stdcall', 'SetWinEventHook', 'void *', ['uint32_t', 'uint32_t', 'void *', 'void *', 'uint32_t', 'uint32_t', 'uint32_t']);
// SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
// eventMin : DWORD -> 'uint32_t'
// eventMax : DWORD -> 'uint32_t'
// hmodWinEventProc : HMODULE optional -> 'void *'
// pfnWinEventProc : WINEVENTPROC -> 'void *'
// idProcess : DWORD -> 'uint32_t'
// idThread : DWORD -> 'uint32_t'
// dwFlags : DWORD -> 'uint32_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
// コールバック(関数ポインタ)は koffi.proto/koffi.register で型を定義して渡す(素の void* では JS 関数を渡せない)。

const lib = Deno.dlopen("USER32.dll", {
  SetWinEventHook: { parameters: ["u32", "u32", "pointer", "pointer", "u32", "u32", "u32"], result: "pointer" },
});
// lib.symbols.SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags)
// eventMin : DWORD -> "u32"
// eventMax : DWORD -> "u32"
// hmodWinEventProc : HMODULE optional -> "pointer"
// pfnWinEventProc : WINEVENTPROC -> "pointer"
// idProcess : DWORD -> "u32"
// idThread : DWORD -> "u32"
// dwFlags : DWORD -> "u32"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。

<?php
$ffi = FFI::cdef(<<<C
void* SetWinEventHook(
    uint32_t eventMin,
    uint32_t eventMax,
    void* hmodWinEventProc,
    void* pfnWinEventProc,
    uint32_t idProcess,
    uint32_t idThread,
    uint32_t dwFlags);
C, "USER32.dll");
// $ffi->SetWinEventHook(eventMin, eventMax, hmodWinEventProc, pfnWinEventProc, idProcess, idThread, dwFlags);
// eventMin : DWORD
// eventMax : DWORD
// hmodWinEventProc : HMODULE optional
// pfnWinEventProc : WINEVENTPROC
// idProcess : DWORD
// idThread : DWORD
// dwFlags : DWORD
// 構造体/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);
    Pointer SetWinEventHook(
        int eventMin,   // DWORD
        int eventMax,   // DWORD
        Pointer hmodWinEventProc,   // HMODULE optional
        Callback pfnWinEventProc,   // WINEVENTPROC
        int idProcess,   // DWORD
        int idThread,   // DWORD
        int dwFlags   // DWORD
    );
}

@[Link("user32")]
lib LibUSER32
  fun SetWinEventHook = SetWinEventHook(
    eventMin : UInt32,   # DWORD
    eventMax : UInt32,   # DWORD
    hmodWinEventProc : Void*,   # HMODULE optional
    pfnWinEventProc : Void*,   # WINEVENTPROC
    idProcess : UInt32,   # DWORD
    idThread : UInt32,   # DWORD
    dwFlags : UInt32   # DWORD
  ) : Void*
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。

import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef SetWinEventHookNative = Pointer<Void> Function(Uint32, Uint32, Pointer<Void>, Pointer<Void>, Uint32, Uint32, Uint32);
typedef SetWinEventHookDart = Pointer<Void> Function(int, int, Pointer<Void>, Pointer<Void>, int, int, int);
final SetWinEventHook = DynamicLibrary.open('USER32.dll')
    .lookupFunction<SetWinEventHookNative, SetWinEventHookDart>('SetWinEventHook');
// eventMin : DWORD -> Uint32
// eventMax : DWORD -> Uint32
// hmodWinEventProc : HMODULE optional -> Pointer<Void>
// pfnWinEventProc : WINEVENTPROC -> Pointer<Void>
// idProcess : DWORD -> Uint32
// idThread : DWORD -> Uint32
// dwFlags : DWORD -> Uint32
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。

{$mode objfpc}{$H+}
function SetWinEventHook(
  eventMin: DWORD;   // DWORD
  eventMax: DWORD;   // DWORD
  hmodWinEventProc: THandle;   // HMODULE optional
  pfnWinEventProc: Pointer;   // WINEVENTPROC
  idProcess: DWORD;   // DWORD
  idThread: DWORD;   // DWORD
  dwFlags: DWORD   // DWORD
): THandle; stdcall;
  external 'USER32.dll' name 'SetWinEventHook';

import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "SetWinEventHook"
  c_SetWinEventHook :: Word32 -> Word32 -> Ptr () -> Ptr () -> Word32 -> Word32 -> Word32 -> IO (Ptr ())
-- eventMin : DWORD -> Word32
-- eventMax : DWORD -> Word32
-- hmodWinEventProc : HMODULE optional -> Ptr ()
-- pfnWinEventProc : WINEVENTPROC -> Ptr ()
-- idProcess : DWORD -> Word32
-- idThread : DWORD -> Word32
-- dwFlags : DWORD -> Word32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。

open Ctypes
open Foreign

let setwineventhook =
  foreign "SetWinEventHook"
    (uint32_t @-> uint32_t @-> (ptr void) @-> (ptr void) @-> uint32_t @-> uint32_t @-> uint32_t @-> returning (ptr void))
(* eventMin : DWORD -> uint32_t *)
(* eventMax : DWORD -> uint32_t *)
(* hmodWinEventProc : HMODULE optional -> (ptr void) *)
(* pfnWinEventProc : WINEVENTPROC -> (ptr void) *)
(* idProcess : DWORD -> uint32_t *)
(* idThread : DWORD -> uint32_t *)
(* dwFlags : DWORD -> uint32_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)

(cffi:define-foreign-library user32 (t "USER32.dll"))
(cffi:use-foreign-library user32)

(cffi:defcfun ("SetWinEventHook" set-win-event-hook :convention :stdcall) :pointer
  (event-min :uint32)   ; DWORD
  (event-max :uint32)   ; DWORD
  (hmod-win-event-proc :pointer)   ; HMODULE optional
  (pfn-win-event-proc :pointer)   ; WINEVENTPROC
  (id-process :uint32)   ; DWORD
  (id-thread :uint32)   ; DWORD
  (dw-flags :uint32))   ; DWORD
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。

use Win32::API;
my $SetWinEventHook = Win32::API::More->new('USER32',
    'HANDLE SetWinEventHook(DWORD eventMin, DWORD eventMax, HANDLE hmodWinEventProc, LPVOID pfnWinEventProc, DWORD idProcess, DWORD idThread, DWORD dwFlags)');
# my $ret = $SetWinEventHook->Call($eventMin, $eventMax, $hmodWinEventProc, $pfnWinEventProc, $idProcess, $idThread, $dwFlags);
# eventMin : DWORD -> DWORD
# eventMax : DWORD -> DWORD
# hmodWinEventProc : HMODULE optional -> HANDLE
# pfnWinEventProc : WINEVENTPROC -> LPVOID
# idProcess : DWORD -> DWORD
# idThread : DWORD -> DWORD
# dwFlags : DWORD -> DWORD
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。
# コールバック(関数ポインタ)は Perl sub を直接渡せません。Win32::API::Callback を使用してください。

SetWinEventHook

シグネチャ

パラメーター

公式ドキュメント

戻り値

解説(Remarks)

例

各言語での呼び出し定義

関連項目