文件名称：Delphi倒计时自动关闭程序.rar
文件大小：6KB
文件格式：RAR
更新时间：2022-07-30 06:34:39
Delphi源码-系统相关
Delphi倒计时自动关闭程序，定时自动关闭程序，当倒计时结束时，会自动关闭本程序窗口。相关的代码如下： I:integer ; procedure TForm1.Button1Click(Sender: TObject); begin try timer1.Interval:=1500; i:=Strtoint(edit1.Text); except showmessage('请输入倒计时关闭程序时间！！！'); timer1.Interval:=0; label1.caption:=''; edit1.SetFocus ; end;
【文件预览】：
srcfans.com
----autoclose()
--------Project1.res(876B)
--------Unit1.dcu(5KB)
--------Unit1.dfm(2KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(1KB)