＋设为首页 ＋添加到收藏夹
public declare function createcompatiblebitmap lib "gdi32" (byval hdc as long,
public declare function deleteobject lib "gdi32" (byval hobject as long) as long 【程序编程相关:给网站添加一个注册表 之 “类的应用” 】
byval nwidth as long, byval nheight as long) as long 【推荐阅读:ASP与ActiveX控件交互实战(三)】 byval y as long, byval nwidth as long, byval nheight as long, 【扩展信息:ASP编程中树型结构的提交】public declare function patblt lib "gdi32" (byval hdc as long, byval x as long,
byval dwrop as long) as longpublic declare function createbrushindirect lib "gdi32" (lplogbrush as logbrush) as long
public declare function fillrect lib "user32" (byval hdc as long, lprect as rect,
byval hbrush as long) as longpublic declare function deletedc lib "gdi32" (byval hdc as long) as long
public declare function createsolidbrush lib "gdi32" (byval crcolor as long) as longpublic declare function createpalette lib "gdi32" (lplogpalette as logpalette) as longpublic declare function selectpalette lib "gdi32" (byval hdc as long,
byval hpalette as long, byval bforcebackground as long) as longpublic declare function getpaletteentries lib "gdi32" (
byval hpalette as long, byval wstartindex as long, byval wnumentries as long, lppaletteentries as paletteentry) as longpublic declare function getbitmapdimensionex lib "gdi32" (
byval hbitmap as long, lpdimension as size) as longpublic declare function getbkcolor lib "gdi32" (byval hdc as long) as long
以下还将定义几个常用到的函数:´返回两者中较小的一个
public function min(byval a as integer, byval b as integer) as integer min = iif(a > b, b, a)end function´返回两者中较大的一个
public function max(byval a as integer, byval b as integer) as integer max = iif(a > b, a, b)end function以下三个函数获取色彩中的各分量值
´取色彩中n的red的值public function getred(byval n as long) as integer getred = n mod 256&end function´取色彩n中的green的值
public function getgreen(byval n as long) as integer getgreen = (n \ 256&) mod 256&end function... 下一页