怎么进行时间转换(50分)

  • 主题发起人 主题发起人 Astimegoby
  • 开始时间 开始时间
A

Astimegoby

Unregistered / Unconfirmed
GUEST, unregistred user!
比如你用datetimepicker中得到的时间2001-9-12
有什么简单的函数可以转换成9/25/2001
 
如果不嫌麻烦,可以用datetostr把日期转换成字符,处理后,再用strtodate转换成日期。
 
FormatDatetime('m"/"d"/"yyyy',datetimepicker.date);

 
用formatDateTime 如:
procedure TForm1.Button1Click(Sender: TObject);
var
s:String;
ADate:TDate;
begin
ADate:=StrToDate('2001-05-01');
s:=formatDateTime('mm/dd/yyyy',ADate);
ShowMessage(s);
end;
 
后退
顶部