窗体动态效果的实现(2)

作者：来源：添加时间：2006-5-22 12:04:56

   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

上一篇：窗体动态效果的实现(1)
下一篇：窗体动态效果的实现(3)

站内搜索