很菜的问题--脸红啊,请高手帮忙!(50分)

  • 主题发起人 主题发起人 woyeah2000
  • 开始时间 开始时间
W

woyeah2000

Unregistered / Unconfirmed
GUEST, unregistred user!
我在用TDateTimePicker时,在date属性中输入了日期,我想程序运行时显示的是系统日期,
不是我手工输入的日期,应该如何实现?谢谢
 
在form1.onshow中写入
DataTimePicker1.date:=Date即可;
 
在一个需要修改时间的地方,比如OnActive事件里写
DataTimePicker.DateTime := Now;
 
不需要一个一个的改:
在Form.Show 事件里
var i:integer;
for i := 0 to ComponentCount - 1 do
if components is TDateTimePicker then
TDateTimePicker(components).Date := date;//date为你自己设定的系统时间
//可能为本机时间now,
//也可能是你从服务器上抓取的时间
 
程序开始时:
DateTimePicker1.Date := Date;
 
DataTimePicker.DateTime := Now;
Enabled:=false;
 
写一个初始化的函数,在里边设置。
 
在程序开始时
DateTimePicker1.Date := Date;则显示的是年-月-日
 
多人接受答案了。
 

Similar threads

后退
顶部