窗体动态效果的完成(3)1

[摘要]window.width = 0 end if next window.x = li_x window.y = li_height+li_y window.width = 0 wind...

    window.width = 0
   end if
next
window.x = li_x
window.y = li_height+li_y
window.width = 0
window.height = 0
window.show()
case 9      // closetype = 9,从左下->右上
for li_gd = li_x to li_x+li_width step 1
   window.x = li_gd
   window.width = li_width +li_x -li_gd
   if window.height > 0 then
    window.height = li_height -(li_gd - li_x)
   else
    window.height = 0
   end if
next
window.x = li_x+li_width
window.y = li_y
window.width = 0
window.height = 0
window.show()
case 10      // closetype = 10,从四面到中间
li_ceny = li_y+li_height/2
li_cenx = li_x+li_width / 2
for li_gd = li_y to li_ceny step 1
   window.y = li_gd
   window.height = li_height - 2*(li_gd - li_y)
   if window.x < li_x + li_cenx then
    window.x = li_x + (li_gd - li_y)
   else
    window.x = li_x + li_cenx
   end if
   if window.width > 0 then
    window.width = li_width - 2*(li_gd - li_y)
   else
    window.width = 0
   end if
next
window.x = li_cenx
window.y = li_ceny
window.width = 0
window.height = 0
window.show()
case else
window.show()
window.width = li_width
window.height = li_height
window.x = li_x
window.y = li_y
END CHOOSE
return 0
************************
// 调用该函数在窗体的 closequery 事件中
gf_closequery (w_main,mod(integer(string(now(),"ss")),11))

上面是关闭时的效果，窗体打开时的动态效果的语句跟上面的差不多，在此就不写啦，如果有需要的可以告诉我，我单独发送。谢谢。

全新的路由器不仅让你更稳定快速地连接无线网络，更可以让家中的智能设备连接在一起。

……

标签:窗体动态效果的完成(3)