
02.03.2010, 21:01
|
 |
Начинающий
|
|
Регистрация: 09.02.2010
Адрес: Россия / Ставрополь
Сообщения: 138
Репутация: 475
|
|
по-моему так:
Код:
const
WeekString: array[1..7] of string = ('Понедельник','Вторник','Среда'
'Четверг','Пятница','Суббота','Воскресенье');
var
day: string;
day_num: integer;
begin
day_num := DayOfWeek(Now); //день в неделе
day := WeekString[day_num];
end;
__________________
Психических заболеваний НЕТ . Просто ДУРАК 
Пусть лучше над тобой смеются, чем плачут...
|