模板
教程
环境
性能
功能
管理
窗体动态效果的实现(2)
发表于：2007-06-07来源：作者：点击数：
标签：
window.height = li_height - 2*(li_gd - li_y) next case 5 // closetype = 5,从左右向中间挤压逐渐消失 li_cenx = li_x+li_width / 2 for li_gd = li_x to li_cenx step 1 window.x = li_gd window.width = li_width - 2*(li_gd - li_x) next case 6 // cl
| window.height = li_height - 2*(li_gd - li_y) next case 5 // closetype = 5,从左右向中间挤压逐渐消失 li_cenx = li_x+li_width / 2 for li_gd = li_x to li_cenx step 1 window.x = li_gd window.width = li_width - 2*(li_gd - li_x) next case 6 // closetype = 6,从左上->右下 for li_gd = li_y to li_height+li_y step 1 window.y = li_gd window.height = li_height+li_y - li_gd if window.x < li_x + li_width then window.x = li_x + (li_gd - li_y) else window.x = li_x + li_width end if if window.width > 0 then window.width = li_x+li_width - window.x else window.width = 0 end if next window.x = li_x + li_width window.y = li_height+li_y window.width = 0 window.height = 0 window.show() case 7 // closetype = 7,从右下->左上 for li_gd = li_height to 0 step -1 window.height = li_gd if window.width > 0 then window.width = li_width - (li_height - li_gd) else window.width = 0 end if next window.x = li_x window.y = li_y window.width = 0 window.height = 0 window.show() case 8 // closetype = 8,从右上->左下 for li_gd = li_y to li_height+li_y step 1 window.y = li_gd window.height = li_height+li_y - li_gd if window.width > 0 then window.width = li_width - (li_gd - li_y) else |
