关于事件控制(50分)

I

ilovedelphi2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-08

• #1

各位老师，你们好！
如何让一个事件在控制好几分钟后才发生？
比如一个FORM1建立后，在3分钟后自动关闭？或者关闭自己，弹出FORM2？
我用Ttime元件却无法实现。希望得到指导。

 

J

Jams

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-08

• #2

TTime定时器所定的时间不能>1分钟，这在该论坛上好象有过讨论，可查询一下。
这可能是Delphi的一点不足。撇开定时器，是否可用取得当前的时间、日期等函数
来解决你的问题呢！

 

王

王寒松

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-08

• #3

TTime不能大于1分钟的BUG，是DELPHI4 5。33版没有加补丁的BUG
你需要DELPHI4 5。37版 ，然后加补丁 PATCH2 以上修正这个BUG
DELPHI3下没有这个问题

 

唐

唐晓锋

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-09

• #4

1.在FormCreate中把当前时间计下来
2.把定时器的间隔设为0.5秒,检测当前时间和FormCreate中的时间
的间隔不就行了.

 

J

JJLEI

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-09

• #5

用Sleep()函数,达到规定的时间就退出,我最近作了一个启动封面,就是用这种
方法,看起来很没有专业精神,是不是?

 

T

tongle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-09

• #6

你可以用下面的程序来进行延时。
var
Count: Integer;

Count := GetTickCount();
while ((GetTickCount() - Count) < 所需时间) do;
--------
单位：毫秒

 

L

liukeen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-07-19

• #7

利用application.Onidle事件可以实现，建议结束此问题

 

柳

柳五公子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-07-19

• #8

唐晓锋的做法比较好！我没有什么可以补充的了！

 

3

3h

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-06

• #9

应该可以结束了。

 

I

ilovedelphi2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-11

• #10

接受答案了.