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

ScrollWindowEx

関数
オプション指定付きでウィンドウ内容をスクロールする。
DLLUSER32.dll呼出規約winapiSetLastErrorあり対応OSWindows Vista 以降
📘 Microsoft Learn (日本語) · English

シグネチャ

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

INT ScrollWindowEx(
    HWND hWnd,
    INT dx,
    INT dy,
    const RECT* prcScroll,   // optional
    const RECT* prcClip,   // optional
    HRGN hrgnUpdate,   // optional
    RECT* prcUpdate,   // optional
    SCROLL_WINDOW_FLAGS flags
);

パラメーター

名前型方向説明
hWndHWNDinクライアント領域をスクロールするウィンドウへのハンドル。
dxINTin水平方向のスクロール量をデバイス単位で指定します。左へスクロールするには、このパラメーターを負の値にする必要があります。
dyINTin垂直方向のスクロール量をデバイス単位で指定します。上へスクロールするには、このパラメーターを負の値にする必要があります。
prcScrollRECT*inoptionalスクロールするクライアント領域の部分を指定する RECT 構造体へのポインター。このパラメーターが NULL の場合、クライアント領域全体がスクロールされます。
prcClipRECT*inoptionalクリッピング四角形の座標を格納する RECT 構造体へのポインター。クリッピング四角形内のデバイスビットのみが影響を受けます。四角形の外側から内側へスクロールされたビットは描画されますが、内側から外側へスクロールされたビットは描画されません。このパラメーターは NULL にすることができます。
hrgnUpdateHRGNinoptionalスクロールによって無効化された領域を保持するために変更されるリージョンへのハンドル。このパラメーターは NULL にすることができます。
prcUpdateRECT*outoptionalスクロールによって無効化された四角形の境界を受け取る RECT 構造体へのポインター。このパラメーターは NULL にすることができます。
flagsSCROLL_WINDOW_FLAGSin

スクロールを制御するフラグを指定します。このパラメーターには、次の値の組み合わせを指定できます。

値 意味
SW_ERASE
 SW_INVALIDATE フラグと共に指定された場合、ウィンドウに WM_ERASEBKGND メッセージを送信して、新たに無効化された領域を消去します。
SW_INVALIDATE
 スクロール後に hrgnUpdate パラメーターで識別されるリージョンを無効化します。
SW_SCROLLCHILDREN
 prcScroll パラメーターが指す四角形と交差するすべての子ウィンドウをスクロールします。子ウィンドウは dx および dy パラメーターで指定されたピクセル数だけスクロールされます。システムは、移動しない場合でも prcScroll 四角形と交差するすべての子ウィンドウに WM_MOVE メッセージを送信します。
SW_SMOOTHSCROLL
 スムーススクロールを使用してスクロールします。スムーススクロール操作に要する時間をミリ秒単位で示すには、 flags パラメーターの HIWORD 部分を使用します。

戻り値の型: INT

公式ドキュメント

ScrollWindowEx 関数は、指定されたウィンドウのクライアント領域の内容をスクロールします。

戻り値

型: int

関数が成功した場合、戻り値は SIMPLEREGION(矩形の無効化されたリージョン)、COMPLEXREGION(非矩形の無効化されたリージョン。重なり合う四角形)、または NULLREGION(無効化されたリージョンなし)のいずれかです。

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

解説(Remarks)

SW_INVALIDATE フラグと SW_ERASE フラグが指定されていない場合、ScrollWindowEx はスクロール元の領域を無効化しません。これらのフラグのいずれかが設定されている場合、ScrollWindowEx はこの領域を無効化します。この領域は、アプリケーションが UpdateWindow 関数を呼び出すか、RedrawWindow 関数(RDW_UPDATENOW または RDW_ERASENOW フラグを指定)を呼び出すか、アプリケーションキューから WM_PAINT メッセージを取得するまで更新されません。

ウィンドウが WS_CLIPCHILDREN スタイルを持つ場合、 hrgnUpdate および prcUpdate で指定される返される領域は、更新が必要な子ウィンドウ内の領域を含む、更新が必要なスクロールされたウィンドウの全領域を表します。

SW_SCROLLCHILDREN フラグが指定されている場合、子ウィンドウの一部がスクロールされると、システムは画面を正しく更新しません。スクロールされた子ウィンドウのソース四角形の外側にある部分は消去されず、新しい移動先で正しく再描画されません。 prcScroll で指定された四角形内に完全には収まらない子ウィンドウを移動するには、DeferWindowPos 関数を使用します。SW_SCROLLCHILDREN フラグが設定され、キャレット四角形がスクロール四角形と交差する場合、カーソルは再配置されます。

すべての入力および出力座標( prcScroll、 prcClip、 prcUpdate、および hrgnUpdate について)は、ウィンドウが CS_OWNDC または CS_CLASSDC クラススタイルを持つかどうかに関係なく、クライアント座標として決定されます。必要に応じて、 LPtoDP および DPtoLP 関数を使用して論理座標との変換を行います。

例

例については、WM_PAINT メッセージによるテキストのスクロールを参照してください。

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

各言語での呼び出し定義

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

INT ScrollWindowEx(
    HWND hWnd,
    INT dx,
    INT dy,
    const RECT* prcScroll,   // optional
    const RECT* prcClip,   // optional
    HRGN hrgnUpdate,   // optional
    RECT* prcUpdate,   // optional
    SCROLL_WINDOW_FLAGS flags
);
[DllImport("USER32.dll", SetLastError = true, ExactSpelling = true)]
static extern int ScrollWindowEx(
    IntPtr hWnd,   // HWND
    int dx,   // INT
    int dy,   // INT
    IntPtr prcScroll,   // RECT* optional
    IntPtr prcClip,   // RECT* optional
    IntPtr hrgnUpdate,   // HRGN optional
    IntPtr prcUpdate,   // RECT* optional, out
    uint flags   // SCROLL_WINDOW_FLAGS
);
<DllImport("USER32.dll", SetLastError:=True, ExactSpelling:=True)>
Public Shared Function ScrollWindowEx(
    hWnd As IntPtr,   ' HWND
    dx As Integer,   ' INT
    dy As Integer,   ' INT
    prcScroll As IntPtr,   ' RECT* optional
    prcClip As IntPtr,   ' RECT* optional
    hrgnUpdate As IntPtr,   ' HRGN optional
    prcUpdate As IntPtr,   ' RECT* optional, out
    flags As UInteger   ' SCROLL_WINDOW_FLAGS
) As Integer
End Function
' hWnd : HWND
' dx : INT
' dy : INT
' prcScroll : RECT* optional
' prcClip : RECT* optional
' hrgnUpdate : HRGN optional
' prcUpdate : RECT* optional, out
' flags : SCROLL_WINDOW_FLAGS
Declare PtrSafe Function ScrollWindowEx Lib "user32" ( _
    ByVal hWnd As LongPtr, _
    ByVal dx As Long, _
    ByVal dy As Long, _
    ByVal prcScroll As LongPtr, _
    ByVal prcClip As LongPtr, _
    ByVal hrgnUpdate As LongPtr, _
    ByVal prcUpdate As LongPtr, _
    ByVal flags As Long) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。
import ctypes
from ctypes import wintypes

ScrollWindowEx = ctypes.windll.user32.ScrollWindowEx
ScrollWindowEx.restype = ctypes.c_int
ScrollWindowEx.argtypes = [
    wintypes.HANDLE,  # hWnd : HWND
    ctypes.c_int,  # dx : INT
    ctypes.c_int,  # dy : INT
    ctypes.c_void_p,  # prcScroll : RECT* optional
    ctypes.c_void_p,  # prcClip : RECT* optional
    wintypes.HANDLE,  # hrgnUpdate : HRGN optional
    ctypes.c_void_p,  # prcUpdate : RECT* optional, out
    wintypes.DWORD,  # flags : SCROLL_WINDOW_FLAGS
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('USER32.dll')
ScrollWindowEx = Fiddle::Function.new(
  lib['ScrollWindowEx'],
  [
    Fiddle::TYPE_VOIDP,  # hWnd : HWND
    Fiddle::TYPE_INT,  # dx : INT
    Fiddle::TYPE_INT,  # dy : INT
    Fiddle::TYPE_VOIDP,  # prcScroll : RECT* optional
    Fiddle::TYPE_VOIDP,  # prcClip : RECT* optional
    Fiddle::TYPE_VOIDP,  # hrgnUpdate : HRGN optional
    Fiddle::TYPE_VOIDP,  # prcUpdate : RECT* optional, out
    -Fiddle::TYPE_INT,  # flags : SCROLL_WINDOW_FLAGS
  ],
  Fiddle::TYPE_INT)
#[link(name = "user32")]
extern "system" {
    fn ScrollWindowEx(
        hWnd: *mut core::ffi::c_void,  // HWND
        dx: i32,  // INT
        dy: i32,  // INT
        prcScroll: *const RECT,  // RECT* optional
        prcClip: *const RECT,  // RECT* optional
        hrgnUpdate: *mut core::ffi::c_void,  // HRGN optional
        prcUpdate: *mut RECT,  // RECT* optional, out
        flags: u32  // SCROLL_WINDOW_FLAGS
    ) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.
$sig = @"
[DllImport("USER32.dll", SetLastError = true)]
public static extern int ScrollWindowEx(IntPtr hWnd, int dx, int dy, IntPtr prcScroll, IntPtr prcClip, IntPtr hrgnUpdate, IntPtr prcUpdate, uint flags);
"@
$api = Add-Type -MemberDefinition $sig -Name 'USER32_ScrollWindowEx' -Namespace Win32 -PassThru
# $api::ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
#uselib "USER32.dll"
#func global ScrollWindowEx "ScrollWindowEx" sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr
; ScrollWindowEx hWnd, dx, dy, varptr(prcScroll), varptr(prcClip), hrgnUpdate, varptr(prcUpdate), flags   ; 戻り値は stat
; hWnd : HWND -> "sptr"
; dx : INT -> "sptr"
; dy : INT -> "sptr"
; prcScroll : RECT* optional -> "sptr"
; prcClip : RECT* optional -> "sptr"
; hrgnUpdate : HRGN optional -> "sptr"
; prcUpdate : RECT* optional, out -> "sptr"
; flags : SCROLL_WINDOW_FLAGS -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数: 
#uselib "USER32.dll"
#cfunc global ScrollWindowEx "ScrollWindowEx" sptr, int, int, var, var, sptr, var, int
; res = ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
; hWnd : HWND -> "sptr"
; dx : INT -> "int"
; dy : INT -> "int"
; prcScroll : RECT* optional -> "var"
; prcClip : RECT* optional -> "var"
; hrgnUpdate : HRGN optional -> "sptr"
; prcUpdate : RECT* optional, out -> "var"
; flags : SCROLL_WINDOW_FLAGS -> "int"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数: 
; INT ScrollWindowEx(HWND hWnd, INT dx, INT dy, RECT* prcScroll, RECT* prcClip, HRGN hrgnUpdate, RECT* prcUpdate, SCROLL_WINDOW_FLAGS flags)
#uselib "USER32.dll"
#cfunc global ScrollWindowEx "ScrollWindowEx" intptr, int, int, var, var, intptr, var, int
; res = ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
; hWnd : HWND -> "intptr"
; dx : INT -> "int"
; dy : INT -> "int"
; prcScroll : RECT* optional -> "var"
; prcClip : RECT* optional -> "var"
; hrgnUpdate : HRGN optional -> "intptr"
; prcUpdate : RECT* optional, out -> "var"
; flags : SCROLL_WINDOW_FLAGS -> "int"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	user32 = windows.NewLazySystemDLL("USER32.dll")
	procScrollWindowEx = user32.NewProc("ScrollWindowEx")
)

// hWnd (HWND), dx (INT), dy (INT), prcScroll (RECT* optional), prcClip (RECT* optional), hrgnUpdate (HRGN optional), prcUpdate (RECT* optional, out), flags (SCROLL_WINDOW_FLAGS)
r1, _, err := procScrollWindowEx.Call(
	uintptr(hWnd),
	uintptr(dx),
	uintptr(dy),
	uintptr(prcScroll),
	uintptr(prcClip),
	uintptr(hrgnUpdate),
	uintptr(prcUpdate),
	uintptr(flags),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // INT
function ScrollWindowEx(
  hWnd: THandle;   // HWND
  dx: Integer;   // INT
  dy: Integer;   // INT
  prcScroll: Pointer;   // RECT* optional
  prcClip: Pointer;   // RECT* optional
  hrgnUpdate: THandle;   // HRGN optional
  prcUpdate: Pointer;   // RECT* optional, out
  flags: DWORD   // SCROLL_WINDOW_FLAGS
): Integer; stdcall;
  external 'USER32.dll' name 'ScrollWindowEx';
result := DllCall("USER32\ScrollWindowEx"
    , "Ptr", hWnd   ; HWND
    , "Int", dx   ; INT
    , "Int", dy   ; INT
    , "Ptr", prcScroll   ; RECT* optional
    , "Ptr", prcClip   ; RECT* optional
    , "Ptr", hrgnUpdate   ; HRGN optional
    , "Ptr", prcUpdate   ; RECT* optional, out
    , "UInt", flags   ; SCROLL_WINDOW_FLAGS
    , "Int")   ; return: INT
●ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags) = DLL("USER32.dll", "int ScrollWindowEx(void*, int, int, void*, void*, void*, void*, dword)")
# 呼び出し: ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
# hWnd : HWND -> "void*"
# dx : INT -> "int"
# dy : INT -> "int"
# prcScroll : RECT* optional -> "void*"
# prcClip : RECT* optional -> "void*"
# hrgnUpdate : HRGN optional -> "void*"
# prcUpdate : RECT* optional, out -> "void*"
# flags : SCROLL_WINDOW_FLAGS -> "dword"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
const std = @import("std");

extern "user32" fn ScrollWindowEx(
    hWnd: ?*anyopaque, // HWND
    dx: i32, // INT
    dy: i32, // INT
    prcScroll: [*c]RECT, // RECT* optional
    prcClip: [*c]RECT, // RECT* optional
    hrgnUpdate: ?*anyopaque, // HRGN optional
    prcUpdate: [*c]RECT, // RECT* optional, out
    flags: u32 // SCROLL_WINDOW_FLAGS
) callconv(std.os.windows.WINAPI) i32;
proc ScrollWindowEx(
    hWnd: pointer,  # HWND
    dx: int32,  # INT
    dy: int32,  # INT
    prcScroll: ptr RECT,  # RECT* optional
    prcClip: ptr RECT,  # RECT* optional
    hrgnUpdate: pointer,  # HRGN optional
    prcUpdate: ptr RECT,  # RECT* optional, out
    flags: uint32  # SCROLL_WINDOW_FLAGS
): int32 {.importc: "ScrollWindowEx", stdcall, dynlib: "USER32.dll".}
pragma(lib, "user32");
extern(Windows)
int ScrollWindowEx(
    void* hWnd,   // HWND
    int dx,   // INT
    int dy,   // INT
    RECT* prcScroll,   // RECT* optional
    RECT* prcClip,   // RECT* optional
    void* hrgnUpdate,   // HRGN optional
    RECT* prcUpdate,   // RECT* optional, out
    uint flags   // SCROLL_WINDOW_FLAGS
);
ccall((:ScrollWindowEx, "USER32.dll"), stdcall, Int32,
      (Ptr{Cvoid}, Int32, Int32, Ptr{RECT}, Ptr{RECT}, Ptr{Cvoid}, Ptr{RECT}, UInt32),
      hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
# hWnd : HWND -> Ptr{Cvoid}
# dx : INT -> Int32
# dy : INT -> Int32
# prcScroll : RECT* optional -> Ptr{RECT}
# prcClip : RECT* optional -> Ptr{RECT}
# hrgnUpdate : HRGN optional -> Ptr{Cvoid}
# prcUpdate : RECT* optional, out -> Ptr{RECT}
# flags : SCROLL_WINDOW_FLAGS -> UInt32
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
local ffi = require("ffi")
ffi.cdef[[
int32_t ScrollWindowEx(
    void* hWnd,
    int32_t dx,
    int32_t dy,
    void* prcScroll,
    void* prcClip,
    void* hrgnUpdate,
    void* prcUpdate,
    uint32_t flags);
]]
local user32 = ffi.load("user32")
-- user32.ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
-- hWnd : HWND
-- dx : INT
-- dy : INT
-- prcScroll : RECT* optional
-- prcClip : RECT* optional
-- hrgnUpdate : HRGN optional
-- prcUpdate : RECT* optional, out
-- flags : SCROLL_WINDOW_FLAGS
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
const koffi = require('koffi');
const lib = koffi.load('USER32.dll');
const ScrollWindowEx = lib.func('__stdcall', 'ScrollWindowEx', 'int32_t', ['void *', 'int32_t', 'int32_t', 'void *', 'void *', 'void *', 'void *', 'uint32_t']);
// ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
// hWnd : HWND -> 'void *'
// dx : INT -> 'int32_t'
// dy : INT -> 'int32_t'
// prcScroll : RECT* optional -> 'void *'
// prcClip : RECT* optional -> 'void *'
// hrgnUpdate : HRGN optional -> 'void *'
// prcUpdate : RECT* optional, out -> 'void *'
// flags : SCROLL_WINDOW_FLAGS -> 'uint32_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
const lib = Deno.dlopen("USER32.dll", {
  ScrollWindowEx: { parameters: ["pointer", "i32", "i32", "pointer", "pointer", "pointer", "pointer", "u32"], result: "i32" },
});
// lib.symbols.ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags)
// hWnd : HWND -> "pointer"
// dx : INT -> "i32"
// dy : INT -> "i32"
// prcScroll : RECT* optional -> "pointer"
// prcClip : RECT* optional -> "pointer"
// hrgnUpdate : HRGN optional -> "pointer"
// prcUpdate : RECT* optional, out -> "pointer"
// flags : SCROLL_WINDOW_FLAGS -> "u32"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
int32_t ScrollWindowEx(
    void* hWnd,
    int32_t dx,
    int32_t dy,
    void* prcScroll,
    void* prcClip,
    void* hrgnUpdate,
    void* prcUpdate,
    uint32_t flags);
C, "USER32.dll");
// $ffi->ScrollWindowEx(hWnd, dx, dy, prcScroll, prcClip, hrgnUpdate, prcUpdate, flags);
// hWnd : HWND
// dx : INT
// dy : INT
// prcScroll : RECT* optional
// prcClip : RECT* optional
// hrgnUpdate : HRGN optional
// prcUpdate : RECT* optional, out
// flags : SCROLL_WINDOW_FLAGS
// 構造体/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);
    int ScrollWindowEx(
        Pointer hWnd,   // HWND
        int dx,   // INT
        int dy,   // INT
        Pointer prcScroll,   // RECT* optional
        Pointer prcClip,   // RECT* optional
        Pointer hrgnUpdate,   // HRGN optional
        Pointer prcUpdate,   // RECT* optional, out
        int flags   // SCROLL_WINDOW_FLAGS
    );
}
@[Link("user32")]
lib LibUSER32
  fun ScrollWindowEx = ScrollWindowEx(
    hWnd : Void*,   # HWND
    dx : Int32,   # INT
    dy : Int32,   # INT
    prcScroll : RECT*,   # RECT* optional
    prcClip : RECT*,   # RECT* optional
    hrgnUpdate : Void*,   # HRGN optional
    prcUpdate : RECT*,   # RECT* optional, out
    flags : UInt32   # SCROLL_WINDOW_FLAGS
  ) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef ScrollWindowExNative = Int32 Function(Pointer<Void>, Int32, Int32, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Void>, Uint32);
typedef ScrollWindowExDart = int Function(Pointer<Void>, int, int, Pointer<Void>, Pointer<Void>, Pointer<Void>, Pointer<Void>, int);
final ScrollWindowEx = DynamicLibrary.open('USER32.dll')
    .lookupFunction<ScrollWindowExNative, ScrollWindowExDart>('ScrollWindowEx');
// hWnd : HWND -> Pointer<Void>
// dx : INT -> Int32
// dy : INT -> Int32
// prcScroll : RECT* optional -> Pointer<Void>
// prcClip : RECT* optional -> Pointer<Void>
// hrgnUpdate : HRGN optional -> Pointer<Void>
// prcUpdate : RECT* optional, out -> Pointer<Void>
// flags : SCROLL_WINDOW_FLAGS -> Uint32
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function ScrollWindowEx(
  hWnd: THandle;   // HWND
  dx: Integer;   // INT
  dy: Integer;   // INT
  prcScroll: Pointer;   // RECT* optional
  prcClip: Pointer;   // RECT* optional
  hrgnUpdate: THandle;   // HRGN optional
  prcUpdate: Pointer;   // RECT* optional, out
  flags: DWORD   // SCROLL_WINDOW_FLAGS
): Integer; stdcall;
  external 'USER32.dll' name 'ScrollWindowEx';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "ScrollWindowEx"
  c_ScrollWindowEx :: Ptr () -> Int32 -> Int32 -> Ptr () -> Ptr () -> Ptr () -> Ptr () -> Word32 -> IO Int32
-- hWnd : HWND -> Ptr ()
-- dx : INT -> Int32
-- dy : INT -> Int32
-- prcScroll : RECT* optional -> Ptr ()
-- prcClip : RECT* optional -> Ptr ()
-- hrgnUpdate : HRGN optional -> Ptr ()
-- prcUpdate : RECT* optional, out -> Ptr ()
-- flags : SCROLL_WINDOW_FLAGS -> Word32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let scrollwindowex =
  foreign "ScrollWindowEx"
    ((ptr void) @-> int32_t @-> int32_t @-> (ptr void) @-> (ptr void) @-> (ptr void) @-> (ptr void) @-> uint32_t @-> returning int32_t)
(* hWnd : HWND -> (ptr void) *)
(* dx : INT -> int32_t *)
(* dy : INT -> int32_t *)
(* prcScroll : RECT* optional -> (ptr void) *)
(* prcClip : RECT* optional -> (ptr void) *)
(* hrgnUpdate : HRGN optional -> (ptr void) *)
(* prcUpdate : RECT* optional, out -> (ptr void) *)
(* flags : SCROLL_WINDOW_FLAGS -> uint32_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library user32 (t "USER32.dll"))
(cffi:use-foreign-library user32)

(cffi:defcfun ("ScrollWindowEx" scroll-window-ex :convention :stdcall) :int32
  (h-wnd :pointer)   ; HWND
  (dx :int32)   ; INT
  (dy :int32)   ; INT
  (prc-scroll :pointer)   ; RECT* optional
  (prc-clip :pointer)   ; RECT* optional
  (hrgn-update :pointer)   ; HRGN optional
  (prc-update :pointer)   ; RECT* optional, out
  (flags :uint32))   ; SCROLL_WINDOW_FLAGS
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $ScrollWindowEx = Win32::API::More->new('USER32',
    'int ScrollWindowEx(HANDLE hWnd, int dx, int dy, LPVOID prcScroll, LPVOID prcClip, HANDLE hrgnUpdate, LPVOID prcUpdate, DWORD flags)');
# my $ret = $ScrollWindowEx->Call($hWnd, $dx, $dy, $prcScroll, $prcClip, $hrgnUpdate, $prcUpdate, $flags);
# hWnd : HWND -> HANDLE
# dx : INT -> int
# dy : INT -> int
# prcScroll : RECT* optional -> LPVOID
# prcClip : RECT* optional -> LPVOID
# hrgnUpdate : HRGN optional -> HANDLE
# prcUpdate : RECT* optional, out -> LPVOID
# flags : SCROLL_WINDOW_FLAGS -> DWORD
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。

関連項目

類似 API
公式の関連項目
使用する型