Как получить год

← →
Чипырик © (2009-05-21 20:41) [0]

Здравствуйте!
Подскажите пожалуйста, как получить текущий год из Date в формате Integer или ТDate

← →
DVM © (2009-05-21 20:48) [1]

YearOf()

← →
Игорь Шевченко © (2009-05-21 21:31) [2]

> из Date в формате Integer

Эт как ?

← →
Игорь Шевченко © (2009-05-21 21:31) [3]

Впрочем, год получить легко - читай уголовный кодекс

← →
Чипырик © (2009-05-21 21:45) [4]

Есди написать так
Label1.Caption:=DateToStr(YearOf(Date));
То результат почему-то равен "01.07.1905" (хотя сегодня 21.05.2009),
А нужно чтобы было "2009"

← →
Германн © (2009-05-21 21:48) [5]

> Чипырик © (21.05.09 21:45) [4]
>
> Есди написать так
> Label1.Caption:=DateToStr(YearOf(Date));

Зачем же писАть чушь? Лучше сначала справку прочесть.

← →
DVM © (2009-05-21 22:02) [6]

> Чипырик © (21.05.09 21:45) [4]

Читай справку дурень. Так бы и сказал, что тебе нужен год строкой.

Caption := IntToStr(YearOf(Now));

или

Caption := FormatDateTime("yyyy", Now);

← →
Чипырик © (2009-05-21 22:03) [7]

Да чет, не нашел я в справке как.

Тама написано function YearOf(const AValue: TDateTime): Word;
и все

2 DVM
Спасибо за подсказку...

З.Ы. Обзываться совсем не обязательно.

> Как получить год

А я почему-то подумал про реальное лишение свободы или хотя бы условно.

> Чипырик © (21.05.09 22:03) [7]
>
> Да чет, не нашел я в справке как.
>
> Тама написано function YearOf(const AValue: TDateTime):
> Word;
> и все
>

И этого более чем достаточно, чтобы не работать с результатом этой функции как с TDate(Time).

Как получить год Найти похожие ветки