Почему ругается на function GetAttrProp и дальше.
Пишет: unsatisfield forward or external declaration 'TRadDict.GetAttrProp'

unit RadDict;

interface

type
TAttrTypes =(AttrStr,AttrInt,AttrIP,AttrTime);

TAttrProp = record
Code: integer;
Name: string;
ValueType: TAttrTypes;
end;

type
TRadDict = class(TObject)
private
function GetAttrProp(AttrCode: integer): TAttrProp;
function GetVSA(VendorID, VSACode: integer): TAttrProp;
public
property Attr[AttrCode: integer]: TAttrProp read GetAttrProp;
property VSA[ VendorID, VSACode: integer]: TAttrProp read GetVSA;
Constructor Create(FileName: string);
Destructor Destroy; override;
end;

implementation

{$R *.dfm}

end.

А с функциями всё ясно :)
Ну подскажите заодно что с этим делать

Constructor Create(FileName: string);
Destructor Destroy; override;

????? Их как надо использовать