在程式初始化時執行下面的方法
//讓delphi程式不受windows日期格式的影響
procedure setsysdateformat;
begin
// 設定windows系統的短日期的格式
setlocaleinfo(locale_system_default, lo cale_sshortdate, 'yyyy-mm-dd');
// 設定程式本身所使用的日期時間格式
longdateformat := 'yyyy-mm-dd';
shortdateformat := 'yyyy-mm-dd';
longtimeformat := 'hh:nn:ss';
shorttimeformat := 'hh:nn:ss';
dateseparator := '-';
timeseparator := ':';
end;
DELPHI中關於系統日期格式及程式處理
delphi呼叫strtodatetime時遇到日期格式錯誤,但是檢查了字串後發現為 2000 01 01 並沒有問題。同事提示我去看一下控制面板裡的 區域和語言選項 裡,發現果然短日期分隔符為 則日期解析的格式變成 2000 01 01,顯然之前的字串會出現問題.於是查詢資料,發現有關於此問題的w...
Delphi日期設定為NULL
在某些情況下,需要將日期欄位的值置空,這種操作比較麻煩。在操作的時候,可將變數的值 t tdatetime 設定為0,在操作的過程中進行判斷,當t的值為0或 1的時候,時間值為1899年的delphi日期最小值,如果使用sql設定日期的空值,可直接用 update table set dt null...
讓delphi程式不受WINDOWS日期格式的影響
如果windows系統的短日期格式為 yyyy m d 執行下面的 會報錯 2013 01 29 00 00 00不是合法的日期 procedure tfrmquerysale.formshow sender tobject varsdate string begin inherited 預設查當天...