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))

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