var LongDateFormat : string;
Переменная LongDateFormat обеспечивает длинное (расширенное) форматирование, используемое для некоторой даты, к строковым преобразованиям. Используется в DateTimeToString процедуре, когда используется форматирование 'dddddd'. Следующие форматирующие символы могут использоваться в LongDateFormat строке: y = Год с использованием 2-х цифр yy = Год с использованием 2-х цифр yyyy = Год с использованием 4-х цифр m = Номер месяца без использования 0 mm = Номер месяца как 2 цифры mmm = Месяц с использованием ShortDayNames (Янв) mmmm = Месяц с использованием LongDayNames (Январь) d = Номер дня без использования 0 dd = Номер дня как 2 цифры ddd = День с использованием ShortDayNames (Воск) dddd = День с использованием LongDayNames (Воскресенье)
|
var myDate : TDateTime; formattedDate : string; begin myDate := StrToDate('29/02/2000'); // Показ значения LongDateFormat, используемого по умолчанию DateTimeToString(formattedDate, 'dddddd', myDate); ShowMessage('29/02/2000 используемый по умолчанию = '+formattedDate); // Изменение отображения форматирования LongDateFormat := 'dddd dd of mmmm yyyy'; DateTimeToString(formattedDate, 'dddddd', myDate); ShowMessage('29/02/2000 с использованием изменений= '+formattedDate); end;
|