这样的计时器怎么做?  (50分)

  • 主题发起人 主题发起人 princeyang
  • 开始时间 开始时间
P

princeyang

Unregistered / Unconfirmed
GUEST, unregistred user!
我想做一个计时的东西
实现如下功能:
我点击按钮1,计时器开始计时,
后面我点击按钮2,如果
这时计时器已经过了五分钟则:
输出:kkkkkk
否则
输出:nnnnnn
要怎么做?
 
添加TIMER组件,初始设置enabled=false;
implementation
{$R *.dfm}
var shijian:integer;//本地变量
procedure TForm1.Button1Click(Sender: TObject);
begin
timer1.enabled:=true;//计时开始
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
inc(shijian);//没一秒加一
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if shijian>300 then

showmessage('kkkkk')
else
showmessage('nnnnnnn');
end;
 
你要JAVA,没看清.晕啥..............
 
你要做什么用?用jsp的化,要提交到服务器上判断,用js就可以直接在网页上判断了
js的话,网上有很多这样的特效,找一个改一下就可以了。
 

Similar threads

回复
0
查看
813
不得闲
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部