问个简单的时间问题，我怎么获得时间里的小时?

Question

在ASP里可以直接用Hour(Now)
在Delphi里怎么实现呢???

Answer 1

Hourof(Now)
Uses
  DateUtils_____________________________________________________________________暮春三月,羊欢草长,天寒地冻,问谁饲狼?人心怜羊,狼心独怆,天心难测,世情如
霜……

Answer 2

procedure TForm1.FormCreate(Sender: TObject);
var s:string;
begin
  s:=DateTimeToStr(HourOf(Now));
  ShowMessage(s);
end;================
之前我已经实验过了，得出的是错误的，是1900-12-30

Answer 3

label1.Caption:=FormatDateTime('HH',Time);

Answer 4

showmessage(FormatDateTime('hh',now()));

Answer 5

procedure TForm1.FormCreate(Sender: TObject);
var s:string;
begin
  s:=IntToStr(HourOf(Now));
  ShowMessage(s);
end;