A simpler solution to that proposed already index either var ShortMonthNames: array[1..12] of string; var LongMonthNames: array[1..12] of string; from the SysUtils unit i.e. strMonthName := LongMonthNames[intMonth];
Visit us online at http://www.ecan.govt.nz ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager. The contents of this email and any attachments are not formal policy of Environment Canterbury, unless otherwise stated. ********************************************************************** _______________________________________________ Delphi mailing list [EMAIL PROTECTED] http://ns3.123.co.nz/mailman/listinfo/delphi
