请问在delphi中怎么写类？

Question

请哪位高人帮我写一个简单的类，让我了解在delphi中怎么写类。谢谢了type
　　TDate = class
　　Mouth,day,Year:Integer;
　　procedure SetValue(m,d,y:Integer);
　　function LeapYear:Boolean;
　　end;
我写了一个上面的这样的，但老是运行就出错，错误提示是 Expected':'but'='found
不知道怎么回事，还有就是请问怎么调用类，请给个实例，谢谢了

Answer 1

TDate = class
  private
  {私有变量和函数等}
  public
  {公有变量和函数等}
end;
你可以参考TForm类的使用

Answer 2

默认的打开 Delphi 的时候，已经创建好一个 class 了， TForm1