PureBasic Forums - English

Posted: **Fri Sep 08, 2006 2:41 pm**

what about an extension for the FormatDate() mask ?

%day and %month are welcome.

Procedure.s FormatDateEx(mask.s, date.l)
  
  Protected days.s   = "Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday"
  Protected months.s = "January,February,March,April,May,June,July,August,September,October,November,December"
  
  mask = ReplaceString(mask, "%day",   StringField(days, DayOfWeek(date) + 1, ","))
  mask = ReplaceString(mask, "%month", StringField(months, Month(date), ","))
  
  ProcedureReturn FormatDate(mask, date)
  
EndProcedure

Posted: **Fri Sep 08, 2006 6:24 pm**

and what about an optional Locale param ???

Dri

PureBasic Forums - English

Extended FormatDate()

Extended FormatDate()