Merge branch 'master' of git://factorcode.org/git/factor

db4
Slava Pestov 2009-09-24 00:13:39 -05:00
commit dee151432c
4 changed files with 32 additions and 0 deletions

View File

@ -0,0 +1 @@
Joe Groff

View File

@ -0,0 +1,28 @@
! (c)2009 Joe Groff bsd license
USING: alien.c-types alien.libraries alien.syntax classes.struct windows.types ;
IN: windows.dwmapi
STRUCT: MARGINS
{ cxLeftWidth int }
{ cxRightWidth int }
{ cyTopHeight int }
{ cyBottomHeight int } ;
STRUCT: DWM_BLURBEHIND
{ dwFlags DWORD }
{ fEnable BOOL }
{ hRgnBlur HANDLE }
{ fTransitionOnMaximized BOOL } ;
: <MARGINS> ( l r t b -- MARGINS )
MARGINS <struct-boa> ; inline
: full-window-margins ( -- MARGINS )
-1 -1 -1 -1 <MARGINS> ; inline
<< "dwmapi" "dwmapi.dll" "stdcall" add-library >>
LIBRARY: dwmapi
FUNCTION: HRESULT DwmExtendFrameIntoClientArea ( HWND hWnd, MARGINS* pMarInset ) ;
FUNCTION: HRESULT DwmEnableBlurBehindWindow ( HWND hWnd, DWM_BLURBEHIND* pBlurBehind ) ;

View File

@ -0,0 +1 @@
Windows Vista Desktop Window Manager API functions

2
basis/windows/dwmapi/tags.txt Executable file
View File

@ -0,0 +1,2 @@
windows
unportable