我声明的构造函数和析购函数为什么通不过编译(10分)

unit Umeber;
interface
uses classes;
type
Tuser=class
private
username:string;
age:Integer;
public
procedure SetUserName(Pname:string);
procedure SetAge(page:integer);
Constructor Create();
Destructor Destroy();override;
end;
出错信息
[Error] Umeber.pas(13): Unsatisfied forward or external declaration: 'Tuser.Create'
[Error] Umeber.pas(14): Unsatisfied forward or external declaration: 'Tuser.Destroy'
[Fatal Error] trail.dpr(7): Could not compile used unit 'Umeber.pas'

两函数只有声明，没有实现部分。继续写完整吧。
另外：因为class声明后面没有加类名，所以Destroy()后面不用加override;

因为class声明后面没有加类名，所以Destroy()后面不用加override;??????
所有的类都是继承tobject的阿，不负该怎么行

你没有写implementation部分啊.

应该是

unit Umeber;

interface
uses classes;

type
Tuser=class
private
username:string;
age:Integer;
public
procedure SetUserName(Pname:string);
procedure SetAge(page:integer);
Constructor Create();
Destructor Destroy();override;
end;

implementation

{ Tuser }

constructor Tuser.Create;
begin

end;

destructor Tuser.Destroy;
begin

inherited;
end;

procedure Tuser.SetAge(page: integer);
begin

end;

procedure Tuser.SetUserName(Pname: string);
begin

end;

end.

你直接从根类继承,不把累死才怪......

ok