试用monthof(),yearof()函数遇到的问题?(Delphi初学,见笑了)

Question

我的是delphi7
 在一form上放置了edit1,edit2,edit3三个文本框,
然后在form的onactive事件里添加了代码如下:
 procedure TForm1.FormActivate(Sender: TObject);
begin
    if (monthOF(date))=1 then
 begin
  edit1.text:=inttostr(yearof(date)-1)
end
 else
 begin 
 edit1.text:=inttostr(yearof(date));
end;
if monthof(date)=1 then
begin
edit2.text:=inttostr(12);
end
else
begin
edit2.text:=inttostr(monthof(date));
end;
EDIT3.TEXT:=datetostr(date);
end;
end.
一编译,就提示monthof和yearof是不能识别的标示符！是何缘故呢？另请问ＶＦＰ中文本框的gotfocus和lostfocus事件对应于ＤＥＬＰＨＩ中文本框的什么事件？？请指点！！！

Answer 1

在interface的uses中加上DateUtils
--------
ＶＦＰ中文本框的gotfocus和lostfocus事件对应于ＤＥＬＰＨＩ中文本框的什么事件OnEnter和OnExit;