菜鸟请教，时间如何转换成字符？简单问题。

Question

datetime1：2004-6-19 10:25:38，转换成字符tempstr1：20040619102538？请给出代码,多谢。

Answer 1

tempstr1 := FormatDateTime('yyyymmddhhnnss', datetime1);

Answer 2

以下代码在D7中通过var
  I: Integer;
  tmStr: string;
begin
  Edit1.Text := '';
  tmStr := DateTimeToStr(Now);
  for I := 0 to Length(tmStr) - 1 do    // Iterate
  begin
    if not (tmStr[i] in ['-', ':', ' '])then
      Edit1.Text := Edit1.Text + tmStr[i];
  end;    // for
end;

Answer 3

二楼的好，我都忘了Format了，有时间没有写了，呵呵。