Windows haskell中的win32 SetForegroundWindow

Windows haskell中的win32 SetForegroundWindow,windows,haskell,Windows,Haskell,我注意到没有一个setforegroundindow函数,我对haskell不够熟练,无法自己添加这个特性。是否有任何方法可以使用haskell进行复制,或者让任何人使用ffi制作自己的包装器?下面是一个使用ffi的简单包装器: {-# LANGUAGE ForeignFunctionInterface #-} module SetForegroundWindow ( setForegroundWindow ) where import Foreign import Graphics.Win

我注意到没有一个
setforegroundindow
函数,我对haskell不够熟练,无法自己添加这个特性。是否有任何方法可以使用haskell进行复制,或者让任何人使用ffi制作自己的包装器?

下面是一个使用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

令人惊叹的!你应该把这个贡献给win32 github页面,@pyCthon,但你为什么不自己贡献呢?@БМММММПМММММЙМАЛССМММММАЛМССССССb我不想为他的工作赢得荣誉