DELPHI7對日期格式的處理

2021-09-22 03:22:00 字數 729 閱讀 9980

windows系統預設的短日期格式是:yyyy/m/d,在delphi中進行字串互轉時,經常會因為格式問題而轉換失敗,以前都是要求施工人員或客戶手動修改系統的短日期格式為:yyyy-mm-dd來解決,近來無事找了一下相關資料,可以解決該問題

在應用程式開啟時,可以通過tformatsettings來設定應用程式的預設日期和時間格式

uses

sysutils, windows;

getlocaleformatsettings(getuserdefaultlcid,fsetting);

fsetting.dateseparator := '-';

fsetting.shortdateformat := 'yyyy-mm-dd';

fsetting.shorttimeformat := '00:00';

fsetting.longdateformat := 'yyyy-mm-dd';

fsetting.longtimeformat := '00:00:00';

//日期時間字串轉換為tdatetime

stime := formatdatetime('yyyy-mm-dd hh:mm:ss',now);

adoq.fields[0].asdatetime := strtodatetime(stime,fsetting);

通過fsetting來對日期時間格式的字串進行tdatetime轉換就不會再出現異常了。

Delphi 7事件的多處理機制

delphi 7事件的多處理機制 allen tao 2007 08 19 首先解釋一下這個題目。在我使用delphi 7的過程中發現,乙個物件的事件只能被乙個過程處理。如果多次給這個物件的事件賦給處理事件的過程,最後真正處理事件的將是最後賦值的那個過程。例如,有類tmyclass中定義了乙個事件o...

Delphi7的IDE概述 一

ideograph margin 0cm 10.8pt 0pt 13.2pt text align justify mso para margin top 0cm mso para margin right 9gd mso para margin bottom 0001pt mso para mar...

Delphi 7 中DBGrid的排序。

procedure tfrmtracereport.dbgrid1titleclick column tcolumn var sortfield,fieldtitle string begin sortfield column.field.fieldname fieldtitle column.ti...