請教各位前輩: 現有一字串01/01/2000格式為mm/dd/yyyy... 這字串要如何轉換為日期呢??? 每台win98電腦的日期設定都不相同.... 假如在日期設定為yyyy/mm/dd的電腦用StrToDate()函數.... 就會發生錯誤..... 不知前輩們都是用何種方式來處理類似的問題....

試試:

ShortDateFormat := 'MM/DD/YYYY'; // 設定為西元日期格式
ShowMessage(DateToStr(StrToDate('01/01/2001'))); 

感謝前輩的指導...Thanks~~

ShortDateFormat := 'mm/dd/eee'; 可用中國年

引言: ShortDateFormat := 'mm/dd/eee'; 可用中國年

樓上的這個'mm/dd/eee' --> ee還是少用為妙 …常常在某些電腦上會失效，不太穩 自己寫個Function 用-1911還比較安全

引言: 試試:

ShortDateFormat := 'MM/DD/YYYY'; // 設定為西元日期格式
ShowMessage(DateToStr(StrToDate('01/01/2001'))); [/code]     

小弟試著去看了一下StrToDate的Source Code, StrToDate會根據ShortDateFormat來判斷你所輸入文字的日期格式, 不過並非是隨便的方式都行, 他透過 function GetDateOrder(const DateFormat: string): TDateOrder; 來取得格式,格式只能有三種若ShortDateFormat第一字 為'E' 'Y' 則定為doYMD 'M'則定為doMDY 'D'則定為doDMY並需以'/'(DateSeparator)為符號做切割其餘形式不接受各位如果有發現的話"年"'yyyy'這個DateString並未在定義格式中也就是若您的ShowDateFormat定義成'D/yyyy/M' 'yyyy'在中間他是不吃的, 原因是後續的程式碼認為若"日"在最前面中間一定跟著"月",相同的若"月"在最前面中間一定跟著"日"所以中間的字串他最多只會讀兩個字,中間若是填四個字的"年"便會產生錯誤. 一點心得~~~~ ^^

引言:

引言: ShortDateFormat := 'mm/dd/eee'; 可用中國年

樓上的這個'mm/dd/eee' --> ee還是少用為妙 …常常在某些電腦上會失效，不太穩 自己寫個Function 用-1911還比較安全

Hi, 發生問題的原因有可能是電腦是英文版的作業系統, 自然是沒有民國曆的格式, 所以仍會出現西曆的格式!! 也就是你所謂的不太穩的現象, 或許你可以往這方面查 看看!