From 47735c3d73cc677e519cd33b58232c97729596fa Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Mon, 9 Jun 2008 23:52:56 +0200 Subject: Date/time string formatting revision Added ability to set custom date/time format --- UCore.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'UCore.pas') diff --git a/UCore.pas b/UCore.pas index 8bc2654..a62495a 100644 --- a/UCore.pas +++ b/UCore.pas @@ -334,15 +334,15 @@ begin ColumnData[ConfColumnIDs[j] - 1] := strdup(PChar(s2)); end; 5: begin - s2 := FormatDateTime('ddddd tt', ModifyTime); + s2 := FormatDate(ModifyTime, True, True); ColumnData[ConfColumnIDs[j] - 1] := strdup(PChar(s2)); end; 6: begin - s2 := FormatDateTime('ddddd', ModifyTime); + s2 := FormatDate(ModifyTime, False, True); ColumnData[ConfColumnIDs[j] - 1] := strdup(PChar(s2)); end; 7: begin - s2 := FormatDateTime('tt', ModifyTime); + s2 := FormatDate(ModifyTime, True, False); ColumnData[ConfColumnIDs[j] - 1] := strdup(PChar(s2)); end; 8: begin -- cgit v1.2.3