DELPHI 字符串与日期格式互转

  1. procedure TForm1.Button1Click(Sender: TObject);
  2. var
  3. D:TDateTime;
  4. s:string;
  5. begin
  6. D:=VarToDateTime('05-10-14 04:35PM');
  7. S:=FormatDatetime('YYYY/MM/DD HH:MM:SS',D);
  8. showmessage(s);
  9. end;