windows - haskell 中的 win32 SetForegroundWindow

Question

我注意到 Haskell Win32 api没有 SetForegroundWindow 函数，而且我对 haskell 不够熟练，无法自己添加此功能。是否有任何方法可以使用 haskell 复制它，或者是否有人使用 ffi 制作了自己的包装器？

Answer 1

这是一个使用 FFI 的简单包装器:

{-# LANGUAGE ForeignFunctionInterface #-}

module SetForegroundWindow
( setForegroundWindow
) where

import Foreign
import Graphics.Win32

foreign import stdcall safe "windows.h SetForegroundWindow"
    c_setForegroundWindow :: HWND -> IO Bool

setForegroundWindow :: HWND -> IO Bool
setForegroundWindow = c_setForegroundWindow