Как из DateTime вытащить число месяца?

← →
Mishenka (2005-01-11 16:14) [0]

← →
begin...end © (2005-01-11 16:17) [1]

> Mishenka (11.01.05 16:14)

Модуль DateUtils, функция DayOf.

← →
Ega23 © (2005-01-11 16:20) [2]

DecodeDate + F1

← →
PZ (2005-01-11 18:09) [3]

Посмотри пример:
procedure TForm1.Button3Click(Sender: TObject);
Var
Dat : tDateTime;
God, Mec, Den : Word;
begin
Dat := Date;
DecodeDate(Dat, God, Mec, Den);
Label1.Caption := IntToStr(Den);
Label2.Caption := IntToStr(Mec);
Label3.Caption := IntToStr(God);
end;

Желание изобретать велосипед с квадратными колёсами труднопреодолимо.

Как из DateTime вытащить число месяца? Найти похожие ветки