[Gudzik11]

Здравствуйте такой вопрос

Код:

 case DayOfWeek(Date) of
     2: day:='пн';
     3: day:='вт';
     4: day:='ср';
     5: day:='чт';
     6: day:='пт';
     7: day:='сб';
     1: day:='вс';
   end;
   Label11.Caption:=day;
   Label12.Caption:=?;
  end;

так вот Label11.Caption выводиться какой то день а в Label12.Caption мне нужно получить следующий день .
подскажите как это зделать ?