v1.0.0
This commit is contained in:
@@ -0,0 +1,55 @@
|
||||
type NumberingAdapter = class
|
||||
public
|
||||
function Create(_obj: Numbering);
|
||||
function Init();
|
||||
|
||||
property AbstractNumId read ReadAbstractNumId write WriteAbstractNumId;
|
||||
property NumId read ReadNumId write WriteNumId;
|
||||
function ReadAbstractNumId(_key: string);
|
||||
function WriteAbstractNumId(_key: string; _value: tslobj);
|
||||
function ReadNumId(_key: string);
|
||||
function WriteNumId(_key: string; _value: tslobj);
|
||||
|
||||
private
|
||||
object_: Numbering;
|
||||
abstractnum_hash_: tableArray;
|
||||
num_hash_: tableArray;
|
||||
end;
|
||||
|
||||
function NumberingAdapter.Create(_obj: Numbering);
|
||||
begin
|
||||
object_ := _obj;
|
||||
abstractnum_hash_ := array();
|
||||
num_hash_ := array();
|
||||
self.Init();
|
||||
end;
|
||||
|
||||
function NumberingAdapter.Init();
|
||||
begin
|
||||
elements := object_.AbstractNums;
|
||||
for k,v in elements do
|
||||
abstractnum_hash_[v.AbstractNumId] := v;
|
||||
elements := object_.Nums;
|
||||
for k,v in elements do
|
||||
num_hash_[v.NumId] := v;
|
||||
end;
|
||||
|
||||
function NumberingAdapter.ReadAbstractNumId(_key: string);
|
||||
begin
|
||||
return abstractnum_hash_[_key];
|
||||
end;
|
||||
|
||||
function NumberingAdapter.WriteAbstractNumId(_key: string; _value: tslobj);
|
||||
begin
|
||||
abstractnum_hash_[_key] := _value;
|
||||
end;
|
||||
|
||||
function NumberingAdapter.ReadNumId(_key: string);
|
||||
begin
|
||||
return num_hash_[_key];
|
||||
end;
|
||||
|
||||
function NumberingAdapter.WriteNumId(_key: string; _value: tslobj);
|
||||
begin
|
||||
num_hash_[_key] := _value;
|
||||
end;
|
||||
@@ -0,0 +1,37 @@
|
||||
type RelationshipsAdapter = class
|
||||
public
|
||||
function Create(_obj: Relationships);
|
||||
function Init();
|
||||
|
||||
property Id read ReadId write WriteId;
|
||||
function ReadId(_key: string);
|
||||
function WriteId(_key: string; _value: tslobj);
|
||||
|
||||
private
|
||||
object_: Relationships;
|
||||
relationship_hash_: tableArray;
|
||||
end;
|
||||
|
||||
function RelationshipsAdapter.Create(_obj: Relationships);
|
||||
begin
|
||||
object_ := _obj;
|
||||
relationship_hash_ := array();
|
||||
self.Init();
|
||||
end;
|
||||
|
||||
function RelationshipsAdapter.Init();
|
||||
begin
|
||||
elements := object_.Relationships;
|
||||
for k,v in elements do
|
||||
relationship_hash_[v.Id] := v;
|
||||
end;
|
||||
|
||||
function RelationshipsAdapter.ReadId(_key: string);
|
||||
begin
|
||||
return relationship_hash_[_key];
|
||||
end;
|
||||
|
||||
function RelationshipsAdapter.WriteId(_key: string; _value: tslobj);
|
||||
begin
|
||||
relationship_hash_[_key] := _value;
|
||||
end;
|
||||
@@ -0,0 +1,37 @@
|
||||
type StylesAdapter = class
|
||||
public
|
||||
function Create(_obj: Styles);
|
||||
function Init();
|
||||
|
||||
property StyleId read ReadStyleId write WriteStyleId;
|
||||
function ReadStyleId(_key: string);
|
||||
function WriteStyleId(_key: string; _value: tslobj);
|
||||
|
||||
private
|
||||
object_: Styles;
|
||||
style_hash_: tableArray;
|
||||
end;
|
||||
|
||||
function StylesAdapter.Create(_obj: Styles);
|
||||
begin
|
||||
object_ := _obj;
|
||||
style_hash_ := array();
|
||||
self.Init();
|
||||
end;
|
||||
|
||||
function StylesAdapter.Init();
|
||||
begin
|
||||
elements := object_.Styles;
|
||||
for k,v in elements do
|
||||
style_hash_[v.StyleId] := v;
|
||||
end;
|
||||
|
||||
function StylesAdapter.ReadStyleId(_key: string);
|
||||
begin
|
||||
return style_hash_[_key];
|
||||
end;
|
||||
|
||||
function StylesAdapter.WriteStyleId(_key: string; _value: tslobj);
|
||||
begin
|
||||
style_hash_[_key] := _value;
|
||||
end;
|
||||
Reference in New Issue
Block a user