procedure TForm1.Button2Click(Sender: TObject);
var
t:TTime;begin
t:=Now;
t:=t+10*60/(24*60*60);
Caption := DateTimeToStr(t);
end;
var
t:TTime;begin
t:=Now;
t:=t+10*60/(24*60*60);
Caption := DateTimeToStr(t);
end;
解决方案 »
- Screen.Cursor := crHourGlass 为什么有时无效?
- delphi7的Idtcpserver与Idtcpclient 和使用?
- Delphi 数据库相关开发的牛人或星星关前来报个到, 认识一下方面的留下QQ号或群号.
- 小问题,帮帮忙
- 请问DELPHI 8 能不能开发出不依赖于.NET框架的程序
- 各位老大!!我刚学delphi希望有个地方下载多媒体教学软件!各位老大,小弟这相鞠躬了!
- 急!急!Delphi中读取磁盘路径下某个word文档,将内容存入数据库,也可以从数据库读取,并显示
- 散分呀!急!后天要交的!!关于2000下用delphi实现拨号的问题!
- 如何制作自己的打印预浏览?????
- Tblobfield(table.fieldbyname(photo.datafield))中TBlobField为何意?
- 谁有“Delphi从入门到精通”的电子文档???
- 如何得知当前的月份呢?
t=Now();
t.DecodeTime(@a,@b,@c, 0);
t=TDateTime(a,b, 0, 0);
每秒为1/(24*60*60)天
呵呵!所以上面CaiDaoLi() 的说法正确。