Author: junrue Date: Tue Mar 28 14:44:59 2006 New Revision: 81
Modified: trunk/src/uitoolkit/system/gdi32.lisp Log: added missing binding for SetPixel
Modified: trunk/src/uitoolkit/system/gdi32.lisp ============================================================================== --- trunk/src/uitoolkit/system/gdi32.lisp (original) +++ trunk/src/uitoolkit/system/gdi32.lisp Tue Mar 28 14:44:59 2006 @@ -356,6 +356,14 @@ (oldlimit LPTR))
(defcfun + ("SetPixel" set-pixel) + COLORREF + (hdc HANDLE) + (x INT) + (y INT) + (color COLORREF)) + +(defcfun ("SetTextColor" set-text-color) COLORREF (hdc HANDLE)
graphic-forms-cvs@common-lisp.net