图片的平滑切换处理技术
用过anfy java程序的用户一定不会忘记其优秀的图像效果处理技术:dump.deform.fireworks.snow.huerot.lake.lens.rot.warp.water等等,的确让人兴奋不已.(若读者还不曾用过anfy,可以到其相关网页http://www.anfyteam.com上去下载,约2917kb,v1.4.3).但作为爱好编程的"程序员",老用别人的东西,总觉得心得不舒服,因此笔者也用vb6.0设计了出图片平滑过渡.加下雪效果这两种方法,以飨读者,而且可以将其设计成activex,在您的网页中也可以使用--有时候,看着自己亲手做的东西,不管是否完美,总觉得有种自豪的感觉--也许这就叫做"自我陶醉". 【程序编程相关:给网站添加一个注册表 之 “类的应用” 】
-------------------------------------------------------------------------------- 【推荐阅读:ASP与ActiveX控件交互实战(三)】
attribute vb_name = "api模块" 【扩展信息:ASP编程中树型结构的提交】
为了高效处理图形,当然需要用到win32 api,以下为常量定义及申明(用户可以利用vb6.0中api浏览器插入),我们将其存入模块api.bas中:
const millicmetercell = 26.45836 ´每一个像素点相当于多少微米public const blackness = &h42public const whiteness = &hff0062public const dstinvert = &h550009public const notsrccopy = &h330008public const notsrcerase = &h1100a6public const srcand = &h8800c6public const srccopy = &hcc0020public const srcerase = &h440328public const srcinvert = &h660046public const srcpaint = &hee0086public type rect
left as long top as long right as long bottom as longend typepublic type logbrush
lbstyle as long lbcolor as long lbhatch as longend typepublic declare function textout lib "gdi32" alias "textouta" (
byval hdc as long, byval x as long, byval y as long, byval lpstring as string, byval ncount as long) as longpublic declare function selectobject lib "gdi32" (
byval hdc as long, byval hobject as long) as longpublic declare function bitblt lib "gdi32" (
byval hdestdc as long, byval x as long, byval y as long, byval nwidth as long, byval nheight as long, byval hsrcdc as long, byval xsrc as long, byval ysrc as long, byval dwrop as long) as longpublic declare function setpixel lib "gdi32" (byval hdc as long,
byval x as long, byval y as long, byval crcolor as long) as longpublic declare function getpixel lib "gdi32" (byval hdc as long,
byval x as long, byval y as long) as longpublic declare function createcompatibledc lib "gdi32" (byval hdc as long) as long
... 下一页