Delphi 獲取系統時間後格式化輸出

2021-06-26 08:45:18 字數 539 閱讀 4329

問題:客戶現場程式執行提示時間格式不對導致的錯誤,原因是與開發環境及公司內部測試環境的日期格式不一致;

解決:統一強制轉換;

//引用單元:sysutils

//目的:實現跨環境相容不同日期格式,如果不做強制格式處理,不同環境存在發生問題的可能性;

function getsystimebyformate: string;

var dtformate: tformatsettings;

begin

trydtformate.shortdateformat := 'yyyy/mm/dd';

dtformate.dateseparator := '/';

dtformate.longtimeformat := 'hh:mm:ss';

dtformate.timeseparator := ':';

result := datetimetostr(now(),dtformate);

except

end;

end;

Delphi 獲取系統時間後格式化輸出

問題 客戶現場程式執行提示時間格式不對導致的錯誤,原因是與開發環境及公司內部測試環境的日期格式不一致 解決 統一強制轉換 引用單元 sysutils 目的 實現跨環境相容不同日期格式,如果不做強制格式處理,不同環境存在發生問題的可能性 function getsystimebyformate str...

用Delphi獲取當前系統時間

在開發應用程式時往往需要獲取當前系統時間。儘管y2k似乎已經平安過去,但在我們新開發的應用程式中還是要謹慎處理 時間 問題。在 融會貫通 delphi4.0實戰技巧 以下簡稱 該書 第89頁專門介紹了兩種獲取當前系統時間的方法,但這兩種方法都存在不足或錯誤,以下就此進行討論。該書第一種方法是利用ti...

用Delphi獲取當前系統時間

在開發應用程式時往往需要獲取當前系統時間。儘管y2k似乎已經平安過去,但在我們新開發的應用程式中還是要謹慎處理 時間 問題。在 融會貫通 delphi4.0實戰技巧 以下簡稱 該書 第89頁專門介紹了兩種獲取當前系統時間的方法,但這兩種方法都存在不足或錯誤,以下就此進行討論。該書第一種方法是利用ti...