Messgedlg('执行吗?',mtConfirmation,mbOk,0),用户不响应时,出现一个倒记时小界面,当倒时为0时,自动执行后面的语句??(50分

  • 主题发起人 主题发起人 小邱
  • 开始时间 开始时间

小邱

Unregistered / Unconfirmed
GUEST, unregistred user!
Messgedlg('执行吗?',mtConfirmation,mbOk,0),用户不响应时,出现一个倒记时小界面,当倒时为0时,自动执行后面的语句??(50分)<br />如题
 
这个肯定是用窗体实现的,而不是用messedlg实现。
自已制作窗体的话,这个问题就很简单,不是吗?:)
 
自己做个对话框,上面放个定时器
 
关键是如何跳过这个对话框?在该语句之前出现倒记时界面,然后用GOTO语句?
 
呵呵~知道你是这个问题。
跟本就没有办法跳过,所以应该另外再建一个窗体来显示提示信息,并且限时。
而不是用messedlg
 
自己写一个窗体,在窗体show的时候,开始记时(用Timer或使用线程进行自循环延时),
记时完毕,自动将该窗体Close,然后执行你要做的事情,可以在该窗体的close事件中
做,也可以在主程序中调用该窗体的那条语句之后做
 
自己做个提示!
 
你程序的控制权已交给了messedlg,没办法跳过的。
除非在后台再运行一个程序,发消息给messedlg。
 
to 萧月禾:
还是应该用showmodal吧,否则与messedlg有很大的不同。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部