以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教袍大师  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78945)

--  作者:hbhb
--  发布时间:2015/12/21 12:27:00
--  请教袍大师
大师:见实例
请问如何实现打开窗口后,独立窗口位置在中间,开始有小点同比例扩大到指定的窗口高度与宽度?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目49.zip


--  作者:大红袍
--  发布时间:2015/12/21 12:41:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目49.foxdb


--  作者:hbhb
--  发布时间:2015/12/21 13:07:00
--  
谢谢!如何实现打开后由一个小点,同比例的快速达到规定的非正方形窗口?
--  作者:大红袍
--  发布时间:2015/12/21 14:54:00
--  

看2楼。非正方形窗口参考

 

下载信息  [文件大小:26.8 KB  下载次数:9]
图片点击可在新窗口打开查看点击浏览该文件:swf窗口.zip


--  作者:sunion
--  发布时间:2018/2/22 21:07:00
--  
请问打开速度在哪里控制?
--  作者:有点甜
--  发布时间:2018/2/22 21:11:00
--  
以下是引用sunion在2018/2/22 21:07:00的发言:
请问打开速度在哪里控制?

 

e.Form.TimerInterval = 1
static n As Integer = 1
static n1 As Integer = 1
n = n + 5
n1 = n1 + 5

Dim x As Integer = (SysInfo.WorkingAreaWidth - e.Form.width) / 2
Dim y As Integer = (SysInfo.WorkingAreaHeight - e.Form.height) / 2
e.Form.SetBounds(x,y,n,n1)
If n > 300 Then
    e.Form.TimerEnabled = False
End If

 

http://www.foxtable.com/webhelp/scr/1301.htm

 


--  作者:sunion
--  发布时间:2018/2/26 20:31:00
--  
棒极了