D delphie Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #1 怎么获得当前系统的时间，其中要包括日期，比如现在是2006年10月4日12点4分57秒，我要得到这样一个结果2006-10-4,12:4:57.有没有什么比较好的办法？最好详细一点
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #2 这样就可以。 formatdatetime('yyyy-mm-dd hh:mm:ss',now);
B batconv Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #3 now() time() formattime='yyyy-mm-dd hh:'具体记不得了，你可以搜一下，格式函数也只记了个大概，好像样子对但拼写不对：）
X xoyo_wu Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #4 edit1.Text:=datetimetostr(now);
D delphie Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #5 我想将这个系统时间赋值给一个变量，不太会弄，高手帮忙
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #6 var myvar:tdatetime; myvar:=now;
X xoyo_wu Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #7 定义一个string类型的变量，直接赋给他就可以可例如 var datetimes:string; procedure TForm1.FormCreate(Sender: TObject); begin datetimes:=datetimetostr(now); edit1.Text:=datetimes; end; 或者 var dt:tdatetime; procedure TForm1.FormCreate(Sender: TObject); begin dt:=now; end;
定义一个string类型的变量，直接赋给他就可以可例如 var datetimes:string; procedure TForm1.FormCreate(Sender: TObject); begin datetimes:=datetimetostr(now); edit1.Text:=datetimes; end; 或者 var dt:tdatetime; procedure TForm1.FormCreate(Sender: TObject); begin dt:=now; end;
A A031933 Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-05 #8 如果在定时器事件里就可以实现实时显示时间，例如 procedure TForm1.Timer1Timer(Sender: TObject); begin edit1.Text:=datetimetostr(now); end;
如果在定时器事件里就可以实现实时显示时间，例如 procedure TForm1.Timer1Timer(Sender: TObject); begin edit1.Text:=datetimetostr(now); end;
