怪事情....这是为什么呀......

unit uperson;interface
uses
  InvokeRegistry,XSBuiltIns,Types,SysUtils;
type
  Tperson = class(TRemotable);
  private     fname : String;
     fage : Integer;
  published
     property name:String read  fname write fname;
     property age:Integer read fage write fage;
  Tpersons:array of Tperson;
end;implementationinitialization
   RemClassRegistry.RegisterXSClass(Tperson,'http://www.w3c.org/2001/XMLSchema','Tperson','',false);
   RemTypeRegistry.RegisterXSInfo((Tperson)Tpersons,'http://www.w3c.org/2001/XMLSchema','Tpersons');
finalization
   RemClassRegistry.UnRegisterXSClass(Tperson);
   RemTypeRegistry.UnRegisterXSInfo((Tperson)Tpersons);
end.
=====================================================================
出错信息如下:
[Error] uperson.pas(10): '=' expected but identifier 'fname' found
[Error] uperson.pas(11): '=' expected but ':' found
[Error] uperson.pas(13): '=' expected but 'PROPERTY' found
[Error] uperson.pas(13): ';' expected but ':' found
[Error] uperson.pas(13): '=' expected but identifier 'fname' found
[Error] uperson.pas(13): '=' expected but identifier 'fname' found
[Error] uperson.pas(14): Declaration expected but 'PROPERTY' found
[Error] uperson.pas(16): 'IMPLEMENTATION' expected but ';' found
[Error] uperson.pas(18): '.' expected but 'IMPLEMENTATION' found
[Fatal Error] test.dpr(12): Could not compile used unit 'uperson.pas'