各位大大: 請問如何將一個Date字串(如2005/06/30)轉為另一格式的Date字串(30/06/2005)呢? (我嘗試用strtodate去作轉換,但系統會立即出error,說錯誤的字串不能轉為Date.) 1437

------
1437

像這樣，DateToStr 跟 StrToDate 都可以指定日期的格式來轉換 未指定的話，會依照系統的預設值，所以不可能有辦法簡單的用一道手續 把年/月/日 變成 日/月/年    但我們可以像這樣，先指定用 年/月/日 的方式，讓 StrToDate 再指定 日/月/年，來 DateToStr 這樣就可以轉過來了    

var
  MyDate: TDate;
  AFormat: TFormatSettings;
begin
  AFormat.ShortDateFormat := 'yyyy/MM/dd';
  AFormat.DateSeparator   := '/';      MyDate := StrToDate('2005/06/30', AFormat);      AFormat.ShortDateFormat := 'dd/MM/yyy';
  ShowMessage(DateToStr(MyDate, AFormat));
end;

發表人 - reptile 於 2005/09/30 13:14:57