win-ffi 0.3.0

data/lib/win-ffi/functions/gdi32/bitmap.rb

@@ -0,0 +1,275 @@
+require 'win-ffi/functions/gdi32'
+
+require 'win-ffi/structs/gdi32/rgb_quad'
+require 'win-ffi/structs/gdi32/bitmap'
+require 'win-ffi/structs/gdi32/bitmap_info'
+require 'win-ffi/structs/gdi32/blend_function'
+
+module WinFFI
+  module Gdi32
+    #BOOL BitBlt(
+    #  _In_  HDC hdcDest,
+    #  _In_  int nXDest,
+    #  _In_  int nYDest,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int nXSrc,
+    #  _In_  int nYSrc,
+    #  _In_  DWORD dwRop )
+    attach_function 'BitBlt', [:hdc, :int, :int, :int, :int, :hdc, :int, :int, :dword], :bool
+
+    #HBITMAP CreateBitmap(
+    #  _In_  int nWidth,
+    #  _In_  int nHeight,
+    #  _In_  UINT cPlanes,
+    #  _In_  UINT cBitsPerPel,
+    #  _In_  const VOID *lpvBits )
+    attach_function 'CreateBitmap', [:int, :int, :uint, :uint, :pointer], :hbitmap
+
+    #HBITMAP CreateBitmapIndirect( _In_  const BITMAP *lpbm )
+    attach_function 'CreateBitmapIndirect', [BITMAP.ptr], :hbitmap
+
+    #HBITMAP CreateCompatibleBitmap(
+    #  _In_  HDC hdc,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight )
+    attach_function 'CreateCompatibleBitmap', [:hdc, :int, :int], :hbitmap
+
+    #HBITMAP CreateDIBitmap(
+    #  _In_  HDC hdc,
+    #  _In_  const BITMAPINFOHEADER *lpbmih,
+    #  _In_  DWORD fdwInit,
+    #  _In_  const VOID *lpbInit,
+    #  _In_  const BITMAPINFO *lpbmi,
+    #  _In_  UINT fuUsage )
+    attach_function 'CreateDIBitmap', [:hdc, :pointer, :dword, :pointer, :pointer], :hbitmap
+
+    #HBITMAP CreateDIBSection(
+    #  _In_   HDC hdc,
+    #  _In_   const BITMAPINFO *pbmi,
+    #  _In_   UINT iUsage,
+    #  _Out_  VOID **ppvBits,
+    #  _In_   HANDLE hSection,
+    #  _In_   DWORD dwOffset )
+    attach_function 'CreateDIBSection', [:hdc, :pointer, :uint, :pointer, :handle, :dword], :hbitmap
+
+    #[This function is provided only for compatibility with 16-bit versions of Windows. Applications should use the CreateCompatibleBitmap function.]
+    #HBITMAP CreateDiscardableBitmap(
+    #  _In_  HDC hdc,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight )
+    attach_function 'CreateDiscardableBitmap', [:hdc, :int, :int], :hbitmap
+
+    #BOOL ExtFloodFill(
+    #  _In_  HDC hdc,
+    #  _In_  int nXStart,
+    #  _In_  int nYStart,
+    #  _In_  COLORREF crColor,
+    #  _In_  UINT fuFillType )
+    attach_function 'ExtFloodFill', [:hdc, :int, :int, :colorref, :uint], :bool
+
+    #BOOL FloodFill(
+    #  _In_  HDC hdc,
+    #  _In_  int nXStart,
+    #  _In_  int nYStart,
+    #  _In_  COLORREF crFill )
+    attach_function 'FloodFill', [:hdc, :int, :int, :colorref], :bool
+
+    #BOOL GdiAlphaBlend(
+    #  _In_  HDC hdcDest,
+    #  _In_  int xoriginDest,
+    #  _In_  int yoriginDest,
+    #  _In_  int wDest,
+    #  _In_  int hDest,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int xoriginSrc,
+    #  _In_  int yoriginSrc,
+    #  _In_  int wSrc,
+    #  _In_  int hSrc,
+    #  _In_  BLENDFUNCTION ftn )
+    attach_function 'GdiAlphaBlend', [:hdc, :int, :int, :int, :int, :hdc, :int, :int, :int, :int, BLENDFUNCTION], :bool
+
+    #BOOL GdiGradientFill(
+    #  _In_  HDC hdc,
+    #  _In_  PTRIVERTEX pVertex,
+    #  _In_  ULONG dwNumVertex,
+    #  _In_  PVOID pMesh,
+    #  _In_  ULONG dwNumMesh,
+    #  _In_  ULONG dwMode )
+    attach_function 'GdiGradientFill', [:hdc, :pointer, :ulong, :pointer, :ulong, :ulong], :bool
+
+    #BOOL GdiTransparentBlt(
+    #  _In_  HDC hdcDest,
+    #  _In_  int xoriginDest,
+    #  _In_  int yoriginDest,
+    #  _In_  int wDest,
+    #  _In_  int hDest,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int xoriginSrc,
+    #  _In_  int yoriginSrc,
+    #  _In_  int wSrc,
+    #  _In_  int hSrc,
+    #  _In_  UINT crTransparent )
+    attach_function 'GdiTransparentBlt', [:hdc, :int, :int, :int, :int, :hdc, :int, :int, :int, :int, :uint], :bool
+
+    #LONG GetBitmapBits(
+    #  _In_   HBITMAP hbmp,
+    #  _In_   LONG cbBuffer,
+    #  _Out_  LPVOID lpvBits )
+    attach_function 'GetBitmapBits', [:hbitmap, :long, :pointer], :long
+
+    #BOOL GetBitmapDimensionEx(
+    #  _In_   HBITMAP hBitmap,
+    #  _Out_  LPSIZE lpDimension )
+    attach_function 'GetBitmapDimensionEx', [:hbitmap, SIZE.ptr], :bool
+
+    #UINT GetDIBColorTable(
+    #  _In_   HDC hdc,
+    #  _In_   UINT uStartIndex,
+    #  _In_   UINT cEntries,
+    #  _Out_  RGBQUAD *pColors )
+    attach_function 'GetDIBColorTable', [:hdc, :uint, :uint, :pointer], :uint
+
+    #int GetDIBits(
+    #  _In_     HDC hdc,
+    #  _In_     HBITMAP hbmp,
+    #  _In_     UINT uStartScan,
+    #  _In_     UINT cScanLines,
+    #  _Out_    LPVOID lpvBits,
+    #  _Inout_  LPBITMAPINFO lpbi,
+    #  _In_     UINT uUsage )
+    attach_function 'GetDIBits', [:hdc, :hbitmap, :uint, :uint, :pointer, :pointer, :uint], :int
+
+    #COLORREF GetPixel(
+    #  _In_  HDC hdc,
+    #  _In_  int nXPos,
+    #  _In_  int nYPos )
+    attach_function 'GetPixel', [:hdc, :int, :int], :colorref
+
+    #int GetStretchBltMode( _In_  HDC hdc )
+    attach_function 'GetStretchBltMode', [:hdc], :int
+
+    #BOOL MaskBlt(
+    #  _In_  HDC hdcDest,
+    #  _In_  int nXDest,
+    #  _In_  int nYDest,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int nXSrc,
+    #  _In_  int nYSrc,
+    #  _In_  HBITMAP hbmMask,
+    #  _In_  int xMask,
+    #  _In_  int yMask,
+    #  _In_  DWORD dwRop )
+    attach_function 'MaskBlt', [:hdc, :int, :int, :int, :int, :hdc, :int, :int, :hbitmap, :int, :int, :dword], :bool
+
+    #BOOL PlgBlt(
+    #  _In_  HDC hdcDest,
+    #  _In_  const POINT *lpPoint,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int nXSrc,
+    #  _In_  int nYSrc,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight,
+    #  _In_  HBITMAP hbmMask,
+    #  _In_  int xMask,
+    #  _In_  int yMask )
+    attach_function 'PlgBlt', [:hdc, POINT.ptr, :hdc, :int, :int, :int, :int, :hbitmap, :int, :int], :bool
+
+    #LONG SetBitmapBits(
+    #  _In_  HBITMAP hbmp,
+    #  _In_  DWORD cBytes,
+    #  _In_  const VOID *lpBits )
+    attach_function 'SetBitmapBits', [:hbitmap, :dword, :pointer], :long
+
+    #BOOL SetBitmapDimensionEx(
+    #  _In_   HBITMAP hBitmap,
+    #  _In_   int nWidth,
+    #  _In_   int nHeight,
+    #  _Out_  LPSIZE lpSize )
+    attach_function 'SetBitmapDimensionEx', [:hbitmap, :int, :int, SIZE.ptr], :bool
+
+    #UINT SetDIBColorTable(
+    #  _In_  HDC hdc,
+    #  _In_  UINT uStartIndex,
+    #  _In_  UINT cEntries,
+    #  _In_  const RGBQUAD *pColors )
+    attach_function 'SetDIBColorTable', [:hdc, :uint, :uint, RGBQUAD.ptr], :uint
+
+    #int SetDIBits(
+    #  _In_  HDC hdc,
+    #  _In_  HBITMAP hbmp,
+    #  _In_  UINT uStartScan,
+    #  _In_  UINT cScanLines,
+    #  _In_  const VOID *lpvBits,
+    #  _In_  const BITMAPINFO *lpbmi,
+    #  _In_  UINT fuColorUse )
+    attach_function 'SetDIBits', [:hdc, :hbitmap, :uint, :uint, :pointer, BITMAPINFO.ptr, :uint], :int
+
+    #int SetDIBitsToDevice(
+    #  _In_  HDC hdc,
+    #  _In_  int XDest,
+    #  _In_  int YDest,
+    #  _In_  DWORD dwWidth,
+    #  _In_  DWORD dwHeight,
+    #  _In_  int XSrc,
+    #  _In_  int YSrc,
+    #  _In_  UINT uStartScan,
+    #  _In_  UINT cScanLines,
+    #  _In_  const VOID *lpvBits,
+    #  _In_  const BITMAPINFO *lpbmi,
+    #  _In_  UINT fuColorUse )
+    attach_function 'SetDIBitsToDevice', [:hdc, :int, :int, :dword, :dword, :int, :int, :uint, :uint, :pointer, BITMAPINFO.ptr, :uint], :int
+
+    #COLORREF SetPixel(
+    #  _In_  HDC hdc,
+    #  _In_  int X,
+    #  _In_  int Y,
+    #  _In_  COLORREF crColor )
+    attach_function 'SetPixel', [:hdc, :int, :int, :colorref], :colorref
+
+    #BOOL SetPixelV(
+    #  _In_  HDC hdc,
+    #  _In_  int X,
+    #  _In_  int Y,
+    #  _In_  COLORREF crColor )
+    attach_function 'SetPixelV', [:hdc, :int, :int, :colorref], :bool
+
+    #int SetStretchBltMode(
+    #  _In_  HDC hdc,
+    #  _In_  int iStretchMode )
+    attach_function 'SetStretchBltMode', [:hdc, :int], :int
+
+    #BOOL StretchBlt(
+    #  _In_  HDC hdcDest,
+    #  _In_  int nXOriginDest,
+    #  _In_  int nYOriginDest,
+    #  _In_  int nWidthDest,
+    #  _In_  int nHeightDest,
+    #  _In_  HDC hdcSrc,
+    #  _In_  int nXOriginSrc,
+    #  _In_  int nYOriginSrc,
+    #  _In_  int nWidthSrc,
+    #  _In_  int nHeightSrc,
+    #  _In_  DWORD dwRop )
+    attach_function 'StretchBlt', [:hdc, :int, :int, :int, :int, :hdc, :int, :int, :int, :int, :dword], :bool
+
+    #int StretchDIBits(
+    #  _In_  HDC hdc,
+    #  _In_  int XDest,
+    #  _In_  int YDest,
+    #  _In_  int nDestWidth,
+    #  _In_  int nDestHeight,
+    #  _In_  int XSrc,
+    #  _In_  int YSrc,
+    #  _In_  int nSrcWidth,
+    #  _In_  int nSrcHeight,
+    #  _In_  const VOID *lpBits,
+    #  _In_  const BITMAPINFO *lpBitsInfo,
+    #  _In_  UINT iUsage,
+    #  _In_  DWORD dwRop )
+    attach_function 'StretchDIBits', [:hdc, :int, :int, :int, :int, :int, :int, :int, :int, :pointer, BITMAPINFO.ptr, :uint, :dword], :int
+  end
+end

data/lib/win-ffi/functions/gdi32/brush.rb

@@ -0,0 +1,54 @@
+require 'win-ffi/functions/gdi32'
+
+require 'win-ffi/enums/gdi32/hatch_styles'
+
+require 'win-ffi/structs/gdi32/log_brush'
+
+module WinFFI
+  module Gdi32
+    #HBRUSH CreateBrushIndirect( _In_  const LOGBRUSH *lplb )
+    attach_function 'CreateBrushIndirect', [LOGBRUSH.ptr], :hbrush
+
+    #HBRUSH CreateDIBPatternBrush(
+    #  _In_  HGLOBAL hglbDIBPacked,
+    #  _In_  UINT fuColorSpec )
+    attach_function 'CreateDIBPatternBrush', [:hglobal, :uint], :hbrush
+
+    #HBRUSH CreateDIBPatternBrushPt(
+    #  _In_  const VOID *lpPackedDIB,
+    #  _In_  UINT iUsage )
+    attach_function 'CreateDIBPatternBrushPt', [:pointer, :uint], :hbrush
+
+    #HBRUSH CreateHatchBrush(
+    #  _In_  int fnStyle,
+    #  _In_  COLORREF clrref )
+    attach_function 'CreateHatchBrush', [HatchStyles, :colorref], :hbrush
+
+    #HBRUSH CreatePatternBrush( _In_  HBITMAP hbmp )
+    attach_function 'CreatePatternBrush', [:hbitmap], :hbrush
+
+    #HBRUSH CreateSolidBrush( _In_  COLORREF crColor )
+    attach_function 'CreateSolidBrush', [:colorref], :hbrush
+
+    #BOOL GetBrushOrgEx(
+    #  _In_   HDC hdc,
+    #  _Out_  LPPOINT lppt )
+    attach_function 'GetBrushOrgEx', [:hdc, POINT.ptr], :bool
+
+    #BOOL PatBlt(
+    #  _In_  HDC hdc,
+    #  _In_  int nXLeft,
+    #  _In_  int nYLeft,
+    #  _In_  int nWidth,
+    #  _In_  int nHeight,
+    #  _In_  DWORD dwRop )
+    attach_function 'PatBlt', [:hdc, :int, :int, :int, :int, :dword], :bool
+
+    #BOOL SetBrushOrgEx(
+    #  _In_   HDC hdc,
+    #  _In_   int nXOrg,
+    #  _In_   int nYOrg,
+    #  _Out_  LPPOINT lppt )
+    attach_function 'SetBrushOrgEx', [:hdc, :int, :int, POINT.ptr], :bool
+  end
+end

data/lib/win-ffi/functions/gdi32/device_context.rb

@@ -0,0 +1,126 @@
+require 'win-ffi/functions/gdi32'
+
+require 'win-ffi/structs/point'
+
+module WinFFI
+  module Gdi32
+      #BOOL CancelDC( _In_  HDC hdc )
+      attach_function 'CancelDC', [:hdc], :bool
+
+      #HDC CreateCompatibleDC( _In_  HDC hdc )
+      attach_function 'CreateCompatibleDC', [:hdc], :hdc
+
+      #HDC CreateDC(
+      #  LPCTSTR lpszDriver,
+      #  _In_  LPCTSTR lpszDevice,
+      #  LPCTSTR lpszOutput,
+      #  _In_  const DEVMODE *lpInitData )
+      attach_function 'CreateDCA', [:string, :string, :pointer, :pointer], :hdc
+      attach_function 'CreateDCW', [:string, :string, :pointer, :pointer], :hdc
+
+      #HDC CreateIC(
+      #  _In_  LPCTSTR lpszDriver,
+      #  _In_  LPCTSTR lpszDevice,
+      #  LPCTSTR lpszOutput,
+      #  _In_  const DEVMODE *lpdvmInit )
+      attach_function 'CreateICA', [:string, :string, :pointer, :pointer], :hdc
+      attach_function 'CreateICW', [:string, :string, :pointer, :pointer], :hdc
+
+      #BOOL DeleteDC( _In_  HDC hdc )
+      attach_function 'DeleteDC', [:hdc], :bool
+
+      #BOOL DeleteObject( _In_  HGDIOBJ hObject )
+      attach_function 'DeleteObject', [:hgdiobj], :bool
+
+      #int DrawEscape(
+      #  _In_  HDC hdc,
+      #  _In_  int nEscape,
+      #  _In_  int cbInput,
+      #  _In_  LPCSTR lpszInData )
+      attach_function 'DrawEscape', [:hdc, :int, :int, :pointer], :int
+
+      #TODO
+      #int EnumObjects(
+      #  _In_  HDC hdc,
+      #  _In_  int nObjectType,
+      #  _In_  GOBJENUMPROC lpObjectFunc,
+      #  _In_  LPARAM lParam )
+      attach_function 'EnumObjects', [:hdc, :int, :pointer, :lparam], :int
+
+      #int CALLBACK EnumObjectsProc(
+      #  _In_  LPVOID lpLogObject,
+      #  _In_  LPARAM lpData )
+      callback 'EnumObjectsProc', [:pointer, :lparam], :int
+
+      #HGDIOBJ GetCurrentObject(
+      #  _In_  HDC hdc,
+      #  _In_  UINT uObjectType )
+      attach_function 'GetCurrentObject', [:hdc, :uint], :hgdiobj
+
+      #COLORREF GetDCBrushColor( _In_  HDC hdc )
+      attach_function 'GetDCBrushColor', [:hdc], :colorref
+
+      #BOOL GetDCOrgEx(
+      #  _In_   HDC hdc,
+      #  _Out_  LPPOINT lpPoint )
+      attach_function 'GetDCOrgEx', [:hdc, POINT.ptr], :bool
+
+      #COLORREF GetDCPenColor( _In_  HDC hdc )
+      attach_function 'GetDCPenColor', [:hdc], :colorref
+
+      #int GetDeviceCaps(
+      #  _In_  HDC hdc,
+      #  _In_  int nIndex )
+      attach_function 'GetDeviceCaps', [:hdc, :int], :int
+
+      #DWORD GetLayout( _In_  HDC hdc )
+      attach_function 'GetLayout', [:hdc], :dword
+
+      #int GetObject(
+      #  _In_   HGDIOBJ hgdiobj,
+      #  _In_   int cbBuffer,
+      #  _Out_  LPVOID lpvObject )
+      attach_function 'GetObjectA', [:hgdiobj, :int, :pointer], :int
+      attach_function 'GetObjectW', [:hgdiobj, :int, :pointer], :int
+
+      #DWORD GetObjectType( _In_  HGDIOBJ h )
+      attach_function 'GetObjectType', [:hgdiobj], :dword
+
+      #HGDIOBJ GetStockObject( _In_  int fnObject )
+      attach_function 'GetStockObject', [:int], :hgdiobj
+
+      #HDC ResetDC(
+      #  _In_  HDC hdc,
+      #  _In_  const DEVMODE *lpInitData )
+      attach_function 'ResetDCA', [:hdc, :pointer], :hdc
+      attach_function 'ResetDCW', [:hdc, :pointer], :hdc
+
+      #BOOL RestoreDC(
+      #  _In_  HDC hdc,
+      #  _In_  int nSavedDC )
+      attach_function 'RestoreDC', [:hdc, :int], :bool
+
+      #int SaveDC( _In_  HDC hdc )
+      attach_function 'SaveDC', [:hdc], :int
+
+      #HGDIOBJ SelectObject(
+      #  _In_  HDC hdc,
+      #  _In_  HGDIOBJ hgdiobj )
+      attach_function 'SelectObject', [:hdc, :hgdiobj], :hgdiobj
+
+      #COLORREF SetDCBrushColor(
+      #  _In_  HDC hdc,
+      #  _In_  COLORREF crColor )
+      attach_function 'SetDCBrushColor', [:hdc, :colorref], :colorref
+
+      #COLORREF SetDCPenColor(
+      #  _In_  HDC hdc,
+      #  _In_  COLORREF crColor )
+      attach_function 'SetDCPenColor', [:hdc, :colorref], :colorref
+
+      #DWORD SetLayout(
+      #  _In_  HDC hdc,
+      #  _In_  DWORD dwLayout )
+      attach_function 'SetLayout', [:hdc, :dword], :dword
+  end
+end

data/lib/win-ffi/functions/gdi32/filled_shape.rb

@@ -0,0 +1,68 @@
+require 'win-ffi/functions/gdi32'
+
+module WinFFI
+  module Gdi32
+      #BOOL Chord(
+      #  _In_  HDC hdc,
+      #  _In_  int nLeftRect,
+      #  _In_  int nTopRect,
+      #  _In_  int nRightRect,
+      #  _In_  int nBottomRect,
+      #  _In_  int nXRadial1,
+      #  _In_  int nYRadial1,
+      #  _In_  int nXRadial2,
+      #  _In_  int nYRadial2 )
+      attach_function 'Chord', [:hdc, :int, :int, :int, :int, :int, :int, :int, :int], :bool
+
+      #BOOL Ellipse(
+      #  _In_  HDC hdc,
+      #  _In_  int nLeftRect,
+      #  _In_  int nTopRect,
+      #  _In_  int nRightRect,
+      #  _In_  int nBottomRect )
+      attach_function 'Ellipse', [:hdc, :int, :int, :int, :int], :bool
+
+      #BOOL Pie(
+      #  _In_  HDC hdc,
+      #  _In_  int nLeftRect,
+      #  _In_  int nTopRect,
+      #  _In_  int nRightRect,
+      #  _In_  int nBottomRect,
+      #  _In_  int nXRadial1,
+      #  _In_  int nYRadial1,
+      #  _In_  int nXRadial2,
+      #  _In_  int nYRadial2 )
+      attach_function 'Pie', [:hdc, :int, :int, :int, :int, :int, :int, :int, :int], :bool
+
+      #BOOL Polygon(
+      #  _In_  HDC hdc,
+      #  _In_  const POINT *lpPoints,
+      #  _In_  int nCount )
+      attach_function 'Polygon', [:hdc, POINT.ptr, :int], :bool
+
+      #BOOL PolyPolygon(
+      #  _In_  HDC hdc,
+      #  _In_  const POINT *lpPoints,
+      #  _In_  const INT *lpPolyCounts,
+      #  _In_  int nCount )
+      attach_function 'PolyPolygon', [:hdc, POINT.ptr, :pointer, :int], :bool
+
+      #BOOL Rectangle(
+      #  _In_  HDC hdc,
+      #  _In_  int nLeftRect,
+      #  _In_  int nTopRect,
+      #  _In_  int nRightRect,
+      #  _In_  int nBottomRect )
+      attach_function 'Rectangle', [:hdc, :int, :int, :int, :int], :bool
+
+      #BOOL RoundRect(
+      #  _In_  HDC hdc,
+      #  _In_  int nLeftRect,
+      #  _In_  int nTopRect,
+      #  _In_  int nRightRect,
+      #  _In_  int nBottomRect,
+      #  _In_  int nWidth,
+      #  _In_  int nHeight )
+      attach_function 'RoundRect', [:hdc, :int, :int, :int, :int, :int, :int], :bool
+  end
+end

data/lib/win-ffi/functions/gdi32/font.rb

@@ -0,0 +1,9 @@
+require 'win-ffi/functions/gdi32'
+
+module WinFFI
+  module Gdi32
+    # HFONT CreateFontIndirect(_In_  const LOGFONT *lplf)
+    attach_function 'CreateFontIndirectA', [LOGFONT.ptr(:in)], :pointer
+    attach_function 'CreateFontIndirectW', [LOGFONT.ptr(:in)], :pointer
+  end
+end

data/lib/win-ffi/functions/gdi32/metafile.rb

@@ -0,0 +1,173 @@
+require 'win-ffi/functions/gdi32'
+
+require 'win-ffi/structs/gdi32/handle_table'
+require 'win-ffi/structs/gdi32/meta_file_pict'
+require 'win-ffi/structs/gdi32/palette_entry'
+
+module WinFFI
+  module Gdi32
+
+      typedef :pointer, :henhmetafile
+
+      #HENHMETAFILE CloseEnhMetaFile( _In_  HDC hdc )
+      attach_function 'CloseEnhMetaFile', [:hdc], :henhmetafile
+
+      #HMETAFILE CloseMetaFile( _In_  HDC hdc )
+      attach_function 'CloseMetaFile', [:hdc], :hmetafile
+
+      #HENHMETAFILE CopyEnhMetaFile(
+      #  _In_  HENHMETAFILE hemfSrc,
+      #  _In_  LPCTSTR lpszFile )
+      attach_function 'CopyEnhMetaFileA', [:henhmetafile, :string], :henhmetafile
+      attach_function 'CopyEnhMetaFileW', [:henhmetafile, :string], :henhmetafile
+
+      #HMETAFILE CopyMetaFile(
+      #  _In_  HMETAFILE hmfSrc,
+      #  _In_  LPCTSTR lpszFile )
+      attach_function 'CopyMetaFileA', [:hmetafile, :string], :hmetafile
+      attach_function 'CopyMetaFileW', [:hmetafile, :string], :hmetafile
+
+      #HDC CreateEnhMetaFile(
+      #  _In_  HDC hdcRef,
+      #  _In_  LPCTSTR lpFilename,
+      #  _In_  const RECT *lpRect,
+      #  _In_  LPCTSTR lpDescription )
+      attach_function 'CreateEnhMetaFileA', [:hdc, :string, RECT.ptr, :string], :hdc
+      attach_function 'CreateEnhMetaFileW', [:hdc, :string, RECT.ptr, :string], :hdc
+
+      #HDC CreateMetaFile( _In_  LPCTSTR lpszFile )
+      attach_function 'CreateMetaFileA', [:string], :hdc
+      attach_function 'CreateMetaFileW', [:string], :hdc
+
+      #BOOL DeleteEnhMetaFile( _In_  HENHMETAFILE hemf )
+      attach_function 'DeleteEnhMetaFile', [:henhmetafile], :bool
+
+      #BOOL DeleteMetaFile( _In_  HMETAFILE hmf )
+      attach_function 'DeleteMetaFile', [:hmetafile], :bool
+
+      #TODO
+      #int CALLBACK EnhMetaFileProc(
+      #  _In_  HDC hDC,
+      #  _In_  HANDLETABLE *lpHTable,
+      #  _In_  const ENHMETARECORD *lpEMFR,
+      #  _In_  int nObj,
+      #  _In_  LPARAM lpData )
+      callback 'EnhMetaFileProc', [:hdc, HANDLETABLE.ptr, :pointer, :int, :lparam], :int
+
+      #BOOL EnumEnhMetaFile(
+      #  _In_  HDC hdc,
+      #  _In_  HENHMETAFILE hemf,
+      #  _In_  ENHMFENUMPROC lpEnhMetaFunc,
+      #  _In_  LPVOID lpData,
+      #  _In_  const RECT *lpRect )
+      attach_function 'EnumEnhMetaFile', [:hdc, :henhmetafile, :pointer, :pointer, RECT.ptr], :bool
+
+      #BOOL EnumMetaFile(
+      #  _In_  HDC hdc,
+      #  _In_  HMETAFILE hmf,
+      #  _In_  MFENUMPROC lpMetaFunc,
+      #  _In_  LPARAM lParam )
+      attach_function 'EnumMetaFile', [:hdc, :hmetafile, :pointer, :lparam], :bool
+
+      #TODO
+      #int CALLBACK EnumMetaFileProc(
+      #  _In_  HDC hDC,
+      #  _In_  HANDLETABLE *lpHTable,
+      #  _In_  METARECORD *lpMFR,
+      #  _In_  int nObj,
+      #  _In_  LPARAM lpClientData )
+      callback 'EnumMetaFileProc', [:hdc, HANDLETABLE.ptr, :pointer, :int, :lparam], :int
+
+      #BOOL GdiComment(
+      #  _In_  HDC hdc,
+      #  _In_  UINT cbSize,
+      #  _In_  const BYTE *lpData )
+      attach_function 'GdiComment', [:hdc, :uint, :pointer], :bool
+
+      #HENHMETAFILE GetEnhMetaFile( _In_  LPCTSTR lpszMetaFile )
+      attach_function 'GetEnhMetaFileA', [:string], :henhmetafile
+      attach_function 'GetEnhMetaFileW', [:string], :henhmetafile
+
+      #UINT GetEnhMetaFileBits(
+      #  _In_   HENHMETAFILE hemf,
+      #  _In_   UINT cbBuffer,
+      #  _Out_  LPBYTE lpbBuffer )
+      attach_function 'GetEnhMetaFileBits', [:henhmetafile, :uint, :pointer], :uint
+
+      #UINT GetEnhMetaFileDescription(
+      #  _In_   HENHMETAFILE hemf,
+      #  _In_   UINT cchBuffer,
+      #  _Out_  LPTSTR lpszDescription )
+      attach_function 'GetEnhMetaFileDescriptionA', [:henhmetafile, :uint, :string], :uint
+      attach_function 'GetEnhMetaFileDescriptionW', [:henhmetafile, :uint, :string], :uint
+
+      #TODO ENHMETAHEADER struct
+      #UINT GetEnhMetaFileHeader(
+      #  _In_   HENHMETAFILE hemf,
+      #  _In_   UINT cbBuffer,
+      #  _Out_  LPENHMETAHEADER lpemh )
+      attach_function 'GetEnhMetaFileHeader', [:henhmetafile, :uint, :pointer], :uint
+
+      #UINT GetEnhMetaFilePaletteEntries(
+      #  _In_   HENHMETAFILE hemf,
+      #  _In_   UINT cEntries,
+      #  _Out_  LPPALETTEENTRY lppe )
+      attach_function 'GetEnhMetaFilePaletteEntries', [:henhmetafile, :uint, PALETTEENTRY.ptr], :uint
+
+      #UINT GetMetaFileBitsEx(
+      #  _In_   HMETAFILE hmf,
+      #  _In_   UINT nSize,
+      #  _Out_  LPVOID lpvData )
+      attach_function 'GetMetaFileBitsEx', [:hmetafile, :uint, :pointer], :uint
+
+      #UINT GetWinMetaFileBits(
+      #  _In_   HENHMETAFILE hemf,
+      #  _In_   UINT cbBuffer,
+      #  _Out_  LPBYTE lpbBuffer,
+      #  _In_   INT fnMapMode,
+      #  _In_   HDC hdcRef )
+      attach_function 'GetWinMetaFileBits', [:henhmetafile, :uint, :pointer, :int, :hdc], :uint
+
+      #BOOL PlayEnhMetaFile(
+      #  _In_  HDC hdc,
+      #  _In_  HENHMETAFILE hemf,
+      #  _In_  const RECT *lpRect )
+      attach_function 'PlayEnhMetaFile', [:hdc, :henhmetafile, RECT.ptr], :bool
+
+      #BOOL PlayEnhMetaFileRecord(
+      #  _In_  HDC hdc,
+      #  _In_  LPHANDLETABLE lpHandletable,
+      #  _In_  const ENHMETARECORD *lpEnhMetaRecord,
+      #  _In_  UINT nHandles )
+      attach_function 'PlayEnhMetaFileRecord', [:hdc, :pointer, :pointer, :uint], :bool
+
+      #BOOL PlayMetaFile(
+      #  _In_  HDC hdc,
+      #  _In_  HMETAFILE hmf )
+      attach_function 'PlayMetaFile', [:hdc, :hmetafile], :bool
+
+      #BOOL PlayMetaFileRecord(
+      #  _In_  HDC hdc,
+      #  _In_  LPHANDLETABLE lpHandletable,
+      #  _In_  LPMETARECORD lpMetaRecord,
+      #  _In_  UINT nHandles )
+      attach_function 'PlayMetaFileRecord', [:hdc, HANDLETABLE.ptr, :pointer, :uint], :bool
+
+      #HENHMETAFILE SetEnhMetaFileBits(
+      #  _In_  UINT cbBuffer,
+      #  _In_  const BYTE *lpData )
+      attach_function 'SetEnhMetaFileBits', [:uint, :pointer], :henhmetafile
+
+      #HMETAFILE SetMetaFileBitsEx(
+      #  _In_  UINT nSize,
+      #  _In_  const BYTE *lpData )
+      attach_function 'SetMetaFileBitsEx', [:uint, :pointer], :hmetafile
+
+      #HENHMETAFILE SetWinMetaFileBits(
+      #  _In_  UINT cbBuffer,
+      #  _In_  const BYTE *lpbBuffer,
+      #  _In_  HDC hdcRef,
+      #  _In_  const METAFILEPICT *lpmfp )
+      attach_function 'SetWinMetaFileBits', [:uint, :pointer, :hdc, METAFILEPICT.ptr], :henhmetafile
+  end
+end