Дата в числах

[Titan123]

есть такая функция:

if datetostr(date)='11.11.1111 then begin
....'

мне нужно сделать так же, только в числах.
например, сказать: "если число равно 1 то...."
как можно реализовать?

[KORN]

var
  h: integer=50;
begin
if h=50 then
//
else
//
end;

[Titan123]

я, наверное, неправильно выразился. я имел ввиду числа месяца. ну там первое января, седьмое декабря. только мне нужно сказать именно число, без года и без месяца

[SERG1980]

if formatdatetime('dd',now)='11'

[Ozerich]

var s:string;
day:integer;
begin
s:=Datetostr(date);
day:=strtoint(copy(s,1,pos(".",s)-1));
showmessage(inttostr(day));
end;

[Titan123]

спасибо, помогло

[Andrei]

Я думаю правильнее воспользоваться функциями DayOf, MonthOf, YearOf из модуля DateUtils.