type FootnotePrAdapter = class public function Create(_obj: FootnotePr); function Init(); function GetFootnoteById(_key: string); function SetFootnoteById(_key: string; _value: tslobj); private object_: FootnotePr; footnote_hash_: tableArray; end; function FootnotePrAdapter.Create(_obj: FootnotePr); begin object_ := _obj; footnote_hash_ := array(); {self.}Init(); end; function FootnotePrAdapter.Init(); begin elements := object_.Footnotes(); for k,v in elements do footnote_hash_[v.Id] := v; end; function FootnotePrAdapter.GetFootnoteById(_key: string); begin return footnote_hash_[_key]; end; function FootnotePrAdapter.SetFootnoteById(_key: string; _value: tslobj); begin footnote_hash_[_key] := _value; end;