Текущая дата

← →
Ната (2003-10-31 09:27) [0]

Скажите, плиз, как программно узнать текущую дату?

← →
WithOut Any ... © (2003-10-31 09:30) [1]

Date, Now

← →
ddenis (2003-10-31 09:30) [2]

Есть такая функция now.

← →
Ната (2003-10-31 09:32) [3]

thanks

← →
Спрашивающий_ (2003-10-31 09:37) [4]

procedure TForm1.Button1Click(Sender: TObject);
var
T:TDateTime;
S:String;
begin
T:=Now ;
DateTimeToString(S,"dd.mm.yy",T);
Text:=s;
end;

← →
Ната (2003-10-31 09:42) [5]

здорово! именно это мне и надо было, я правда уже сделала по-другому, но это лучше

> Спрашивающий_ (31.10.03 09:37) [4]
> procedure TForm1.Button1Click(Sender: TObject);
> var
> T:TDateTime;
> S:String;
> begin
> T:=Now ;
> DateTimeToString(S,"dd.mm.yy",T);
> Text:=s;
> end;

во, млин, наворотил
а так не проще?
Text:=FormatDateTime("dd.mm.yy",Now);

Текущая дата Найти похожие ветки