aa = object
     a1:integer;
     b1:integer;
     c:integer;
    private
    { Private declarations }
    public
     constructor Create();
     destructor Destroy;
     procedure  add;
    { Public declarations }
  end;

原来DELPHI还能这么定义类.里面全是类方法,可以用来C++ 里的RECORD了.