heychen 发表于 2008-6-21 11:33

这样的情况如何衔接的更完美?

我做了一个欢迎界面,等待两秒后,欢迎界面自动关闭,转而打开登陆界面,但有一个瑕疵,欢迎界面关闭是一闪而过的,登陆窗口也是一下子弹出的,这样,两个同时进行就形成了一个闪烁,不太美观,有种程序出错关闭的感觉。不知道怎么能让两个表单交接时衔接的更好,有个想法:欢迎界面消失后等0.5s后才弹出登陆,但不会写这个等待命令。。

fown 发表于 2008-6-21 12:42

想像WORD一样吗

fown 发表于 2008-6-21 12:44

在欢迎界面的ACTIVATE事件中写入
TitleTime = DATETIME()
Do While DATETIME() - TitleTime <=1
Enddo
Thisform.Release
在UNLOAD事件中写入
DO FORM 你的下一个表单

qjbzjp 发表于 2008-6-21 14:37

用 wait命令最简单

DO form 欢迎界面
WAIT "" timeout 0.5
DO form 登录界面

heychen 发表于 2008-6-21 16:20

首先感谢楼上两位的提示,我的做法和三楼的差不多,不过是用计时器,1秒后欢迎表单消失,登陆表单打开,就是这样中间衔接的不好,我是想有没有办法在欢迎表单消失后有0.5秒或1秒的空间,再打开登陆表单,我在UNLOAD里加了4楼的WAIT "" timeout 0.5,发现这样原来会有一个等待输入的界面出现再消失。。。

午丁 发表于 2008-6-21 20:38

[quote][bo][un]heychen[/un] 在 2008-6-21 11:33 的发言:[/bo]

我做了一个欢迎界面,等待两秒后,欢迎界面自动关闭,转而打开登陆界面,但有一个瑕疵,欢迎界面关闭是一闪而过的,登陆窗口也是一下子弹出的,这样,两个同时进行就形成了一个闪烁,不太美观,有种程序出错关闭的感 ... [/quote]

关于“一闪”,我也还没有确实能行的号办法,我是这样处理的:

_screen.visible=.F.   && 一闪

do 第一表单
   inkey(2)
第一表单.release
inkey(0.5)   &&&  能不能用小数,我还没试过
do 第二表单
……

*  2个表单都作为顶层表单
*  我的做法是:在 _screen    缩小尺寸、移除所有工具栏
在程序中:
1、关闭菜单栏(SET SYSMENU OFF )
2、关闭标题栏(_screen.titlebar=0)
3、添加必要的控件、设定属性
   以作为欢迎界面的表单(我有添加一个“_timer”控制时间并进行下一步操作)
4、关闭欢迎表单——  _screen.vislble=.F.
5、 do 表单
……
reda events
……
……

heychen 发表于 2008-6-23 08:25

。。。。。。
谢谢楼上的
但现在是问题百出。。。
我都快郁闷死了[tk33] [tk33] [tk33]

fown 发表于 2008-6-23 20:16

我说的方法是我一个成型软件里的方法,和WORD一样,启动相当完美啊

页: [1]

编程论坛