From 0db8dc5d4f1c0142e68b575f3afe9b90fdc92cef Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Sat, 16 Feb 2013 23:01:26 -0500 Subject: [PATCH] Added Day and Month 3 character constants --- mdl/m_datetime.pas | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/mdl/m_datetime.pas b/mdl/m_datetime.pas index 066c3b7..a3550e1 100644 --- a/mdl/m_datetime.pas +++ b/mdl/m_datetime.pas @@ -4,6 +4,10 @@ Unit m_DateTime; Interface +Const + DayString : Array[0..6] of String[3] = ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat'); + MonthString : Array[1..12] of String[3] = ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'); + Procedure WaitMS (MS: Word); Function TimerMinutes : LongInt; Function TimerSeconds : LongInt;