Delphi XE 字符串与日期格式互转

时间：2020-01-10 14:59:22 收藏：0 阅读：204

procedure TForm1.btn1Click(Sender: TObject);
var
D:TDateTime;
s:string;
begin
D:=VarToDateTime(‘20-01-01 04:35PM‘);
S:=FormatDatetime(‘YYYY-MM-DD HH:MM:SS‘,D);
showmessage(s);
end;

看到有人这样用VarToDateTime、存下来、强大的日期通杀

原文：https://www.cnblogs.com/redhat588/p/12175662.html