2005-02-04から1日間の記事一覧

FormatDateTime の月、曜日を英語表記にする方法

Delphi

var StoredMonthDayNames: Boolean = False; OldShortMonthNames: array [1..12] of string; OldLongMonthNames: array [1..12] of string; OldShortDayNames: array [1..12] of string; OldLongDayNames: array [1..12] of string;//Delphi標準のグローバル…

グリニッジ標準時に変換する方法

Delphi

最近は、Delphiちょこちょこやっております。 function LocalDateTimeToUTC(Value: TDateTime): TDateTime; var s: TSystemTime; f1, f2: TFileTime; begin DateTimeToSystemTime(Value, s); SystemTimeToFileTime(s, f1); LocalFileTimeToFileTime(f1, f2);…