|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 Delphi论坛 』
→ Timer元件怎么使用的,求大虾指点
我的收件箱(0)
共有
626
人关注过本帖
标题:
Timer元件怎么使用的,求大虾指点
只看楼主
加入收藏
tw920217
来 自:湖南
等 级:
业余侠客
帖 子:64
专家分:217
注 册:2011-6-2
结帖率:
100%
楼主
收藏
已结贴
√
问题点数:20 回复次数:4
Timer元件怎么使用的,求大虾指点
我有2个按钮.我希望用一个Timer元件设定成每天早上8点自动执行两个按钮事件.
但是现在我不知道怎么用Timer元件调用当前时间是否为早上8点.还有就是if Time.Now is 8.00 按钮事件怎么实现?
求好心人指点一二嗄....
Best Regards
公司分機:886-03-250-8800-2156
手機:15818580357 聯系地址:深圳
2011-07-01 08:23
举报帖子
使用道具
赠送鲜花
yuutian
等 级:
黑侠
帖 子:137
专家分:686
注 册:2010-10-27
第
2
楼
收藏
得分:0
你可以参考一下,整点报时的那种例子,在整点时,触发事件。
2011-07-01 09:04
举报帖子
使用道具
赠送鲜花
tw920217
来 自:湖南
等 级:
业余侠客
帖 子:64
专家分:217
注 册:2011-6-2
第
3
楼
收藏
得分:0
我这边不能下载 .
搜到了也下载不了.
我只需要知道.
Timer元件怎样对应获得时间.
Best Regards
公司分機:886-03-250-8800-2156
手機:15818580357 聯系地址:深圳
2011-07-01 13:11
举报帖子
使用道具
赠送鲜花
zin5970
等 级:
论坛游侠
帖 子:29
专家分:195
注 册:2008-10-10
第
4
楼
收藏
得分:15
//在Timer元件的OnTimer事件里判断Now的值啊,Delphi里用Now表示当前日期时间
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if
Formatdatetime('hh:mm:ss',now) = '08:00:00' then
Form1.Caption := '现在是8:00';
end;
2011-07-01 15:22
举报帖子
使用道具
赠送鲜花
yuutian
等 级:
黑侠
帖 子:137
专家分:686
注 册:2010-10-27
第
5
楼
收藏
得分:5
这个可以实现,你在修改一下就可以符合你的要求了
procedure TForm1.Timer1Timer(Sender: TObject);
var
sj1:string;
bjsj1:string;
begin
label1.Caption:=timetostr(now);
sj1:=formatdatetime('hh:mm',now);
bjsj1:=formatdatetime('hh:mm',datetimepicker1.Time);
if sj1=bjsj1 then//当时间相等时,执行窗体关闭,不相等时,窗体一直显示,
form1.Close
else
form1.Show;
end;
end.
2011-07-01 15:48
举报帖子
使用道具
赠送鲜花
5
1/1页
1
快速回复:
Timer元件怎么使用的,求大虾指点
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013314 second(s), 7 queries.
Copyright©2004-2025, BC-CN.NET, All Rights Reserved