3.0.0 update
This commit is contained in:
parent
0b60aeb006
commit
67a7d27363
|
|
@ -0,0 +1,6 @@
|
|||
unit OFFICEXML;
|
||||
interface
|
||||
const Version = "3.0.0";
|
||||
|
||||
implementation
|
||||
end.
|
||||
File diff suppressed because it is too large
Load Diff
|
|
@ -8,6 +8,7 @@ public
|
|||
|
||||
function GetTabByVal(_key: string);
|
||||
function AddTab(_value: Tab);
|
||||
function RemoveTab(_value: Tab);
|
||||
|
||||
property TabCount: uinteger read tab_count_;
|
||||
|
||||
|
|
@ -24,8 +25,10 @@ public
|
|||
|
||||
function GetHeaderReferenceByType(_key: string);
|
||||
function AddHeaderReference(_value: HeaderReference);
|
||||
function RemoveHeaderReference(_value: HeaderReference);
|
||||
function GetFooterReferenceByType(_key: string);
|
||||
function AddFooterReference(_value: FooterReference);
|
||||
function RemoveFooterReference(_value: FooterReference);
|
||||
|
||||
property HeaderReferenceCount: uinteger read headerreference_count_;
|
||||
property FooterReferenceCount: uinteger read footerreference_count_;
|
||||
|
|
@ -45,6 +48,7 @@ public
|
|||
|
||||
function GetEndnoteById(_key: string);
|
||||
function AddEndnote(_value: Endnote);
|
||||
function RemoveEndnote(_value: Endnote);
|
||||
|
||||
property EndnoteCount: uinteger read endnote_count_;
|
||||
|
||||
|
|
@ -61,6 +65,7 @@ public
|
|||
|
||||
function GetFootnoteById(_key: string);
|
||||
function AddFootnote(_value: Footnote);
|
||||
function RemoveFootnote(_value: Footnote);
|
||||
|
||||
property FootnoteCount: uinteger read footnote_count_;
|
||||
|
||||
|
|
@ -77,6 +82,7 @@ public
|
|||
|
||||
function GetFootnoteById(_key: string);
|
||||
function AddFootnote(_value: Footnote);
|
||||
function RemoveFootnote(_value: Footnote);
|
||||
|
||||
property FootnoteCount: uinteger read footnote_count_;
|
||||
|
||||
|
|
@ -93,6 +99,7 @@ public
|
|||
|
||||
function GetFootnoteById(_key: string);
|
||||
function AddFootnote(_value: Footnote);
|
||||
function RemoveFootnote(_value: Footnote);
|
||||
|
||||
property FootnoteCount: uinteger read footnote_count_;
|
||||
|
||||
|
|
@ -110,6 +117,7 @@ public
|
|||
function GetStyleByStyleId(_key: string);
|
||||
function GetStyleByName(_key: string);
|
||||
function AddStyle(_value: Style);
|
||||
function RemoveStyle(_value: Style);
|
||||
|
||||
property StyleCount: uinteger read style_count_;
|
||||
|
||||
|
|
@ -127,6 +135,7 @@ public
|
|||
|
||||
function GetTblStylePrByType(_key: string);
|
||||
function AddTblStylePr(_value: TblStylePr);
|
||||
function RemoveTblStylePr(_value: TblStylePr);
|
||||
|
||||
property TblStylePrCount: uinteger read tblstylepr_count_;
|
||||
|
||||
|
|
@ -143,8 +152,10 @@ public
|
|||
|
||||
function GetAbstractNumByAbstractNumId(_key: string);
|
||||
function AddAbstractNum(_value: AbstractNum);
|
||||
function RemoveAbstractNum(_value: AbstractNum);
|
||||
function GetNumByNumId(_key: string);
|
||||
function AddNum(_value: Num);
|
||||
function RemoveNum(_value: Num);
|
||||
|
||||
property AbstractNumCount: uinteger read abstractnum_count_;
|
||||
property NumCount: uinteger read num_count_;
|
||||
|
|
@ -170,9 +181,9 @@ end;
|
|||
function Tabs.Init();
|
||||
begin
|
||||
elements := object_.Tabs();
|
||||
tab_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
tab_val_hash_[v.Val] := v;
|
||||
tab_count_++;
|
||||
end;
|
||||
|
||||
function Tabs.GetTabByVal(_key: string);
|
||||
|
|
@ -186,6 +197,12 @@ begin
|
|||
tab_count_++;
|
||||
end;
|
||||
|
||||
function Tabs.RemoveTab(_value: Tab);
|
||||
begin
|
||||
reindex(tab_val_hash_, array(_value.Val: nil));
|
||||
tab_count_--;
|
||||
end;
|
||||
|
||||
function SectPr.create(_obj: SectPr);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -199,13 +216,13 @@ end;
|
|||
function SectPr.Init();
|
||||
begin
|
||||
elements := object_.HeaderReferences();
|
||||
headerreference_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
headerreference_type_hash_[v.Type] := v;
|
||||
headerreference_count_++;
|
||||
elements := object_.FooterReferences();
|
||||
footerreference_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
footerreference_type_hash_[v.Type] := v;
|
||||
footerreference_count_++;
|
||||
end;
|
||||
|
||||
function SectPr.GetHeaderReferenceByType(_key: string);
|
||||
|
|
@ -219,6 +236,12 @@ begin
|
|||
headerreference_count_++;
|
||||
end;
|
||||
|
||||
function SectPr.RemoveHeaderReference(_value: HeaderReference);
|
||||
begin
|
||||
reindex(headerreference_type_hash_, array(_value.Type: nil));
|
||||
headerreference_count_--;
|
||||
end;
|
||||
|
||||
function SectPr.GetFooterReferenceByType(_key: string);
|
||||
begin
|
||||
return footerreference_type_hash_[_key];
|
||||
|
|
@ -230,6 +253,12 @@ begin
|
|||
footerreference_count_++;
|
||||
end;
|
||||
|
||||
function SectPr.RemoveFooterReference(_value: FooterReference);
|
||||
begin
|
||||
reindex(footerreference_type_hash_, array(_value.Type: nil));
|
||||
footerreference_count_--;
|
||||
end;
|
||||
|
||||
function Endnotes.create(_obj: Endnotes);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -241,9 +270,9 @@ end;
|
|||
function Endnotes.Init();
|
||||
begin
|
||||
elements := object_.Endnotes();
|
||||
endnote_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
endnote_id_hash_[v.Id] := v;
|
||||
endnote_count_++;
|
||||
end;
|
||||
|
||||
function Endnotes.GetEndnoteById(_key: string);
|
||||
|
|
@ -257,6 +286,12 @@ begin
|
|||
endnote_count_++;
|
||||
end;
|
||||
|
||||
function Endnotes.RemoveEndnote(_value: Endnote);
|
||||
begin
|
||||
reindex(endnote_id_hash_, array(_value.Id: nil));
|
||||
endnote_count_--;
|
||||
end;
|
||||
|
||||
function Footnotes.create(_obj: Footnotes);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -268,9 +303,9 @@ end;
|
|||
function Footnotes.Init();
|
||||
begin
|
||||
elements := object_.Footnotes();
|
||||
footnote_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
footnote_id_hash_[v.Id] := v;
|
||||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function Footnotes.GetFootnoteById(_key: string);
|
||||
|
|
@ -284,6 +319,12 @@ begin
|
|||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function Footnotes.RemoveFootnote(_value: Footnote);
|
||||
begin
|
||||
reindex(footnote_id_hash_, array(_value.Id: nil));
|
||||
footnote_count_--;
|
||||
end;
|
||||
|
||||
function FootnotePr.create(_obj: FootnotePr);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -295,9 +336,9 @@ end;
|
|||
function FootnotePr.Init();
|
||||
begin
|
||||
elements := object_.Footnotes();
|
||||
footnote_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
footnote_id_hash_[v.Id] := v;
|
||||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function FootnotePr.GetFootnoteById(_key: string);
|
||||
|
|
@ -311,6 +352,12 @@ begin
|
|||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function FootnotePr.RemoveFootnote(_value: Footnote);
|
||||
begin
|
||||
reindex(footnote_id_hash_, array(_value.Id: nil));
|
||||
footnote_count_--;
|
||||
end;
|
||||
|
||||
function EndnotePr.create(_obj: EndnotePr);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -322,9 +369,9 @@ end;
|
|||
function EndnotePr.Init();
|
||||
begin
|
||||
elements := object_.Footnotes();
|
||||
footnote_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
footnote_id_hash_[v.Id] := v;
|
||||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function EndnotePr.GetFootnoteById(_key: string);
|
||||
|
|
@ -338,6 +385,12 @@ begin
|
|||
footnote_count_++;
|
||||
end;
|
||||
|
||||
function EndnotePr.RemoveFootnote(_value: Footnote);
|
||||
begin
|
||||
reindex(footnote_id_hash_, array(_value.Id: nil));
|
||||
footnote_count_--;
|
||||
end;
|
||||
|
||||
function Styles.create(_obj: Styles);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -350,11 +403,11 @@ end;
|
|||
function Styles.Init();
|
||||
begin
|
||||
elements := object_.Styles();
|
||||
style_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
begin
|
||||
style_styleid_hash_[v.StyleId] := v;
|
||||
style_name_hash_[v.Name.Val] := v;
|
||||
style_count_++;
|
||||
end
|
||||
end;
|
||||
|
||||
|
|
@ -375,6 +428,13 @@ begin
|
|||
style_count_++;
|
||||
end;
|
||||
|
||||
function Styles.RemoveStyle(_value: Style);
|
||||
begin
|
||||
reindex(style_styleid_hash_, array(_value.StyleId: nil));
|
||||
reindex(style_name_hash_, array(_value.Name.Val: nil));
|
||||
style_count_--;
|
||||
end;
|
||||
|
||||
function Style.create(_obj: Style);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -386,9 +446,9 @@ end;
|
|||
function Style.Init();
|
||||
begin
|
||||
elements := object_.TblStylePrs();
|
||||
tblstylepr_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
tblstylepr_type_hash_[v.Type] := v;
|
||||
tblstylepr_count_++;
|
||||
end;
|
||||
|
||||
function Style.GetTblStylePrByType(_key: string);
|
||||
|
|
@ -402,6 +462,12 @@ begin
|
|||
tblstylepr_count_++;
|
||||
end;
|
||||
|
||||
function Style.RemoveTblStylePr(_value: TblStylePr);
|
||||
begin
|
||||
reindex(tblstylepr_type_hash_, array(_value.Type: nil));
|
||||
tblstylepr_count_--;
|
||||
end;
|
||||
|
||||
function Numbering.create(_obj: Numbering);
|
||||
begin
|
||||
object_ := _obj;
|
||||
|
|
@ -415,13 +481,13 @@ end;
|
|||
function Numbering.Init();
|
||||
begin
|
||||
elements := object_.AbstractNums();
|
||||
abstractnum_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
abstractnum_abstractnumid_hash_[v.AbstractNumId] := v;
|
||||
abstractnum_count_++;
|
||||
elements := object_.Nums();
|
||||
num_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
num_numid_hash_[v.NumId] := v;
|
||||
num_count_++;
|
||||
end;
|
||||
|
||||
function Numbering.GetAbstractNumByAbstractNumId(_key: string);
|
||||
|
|
@ -435,6 +501,12 @@ begin
|
|||
abstractnum_count_++;
|
||||
end;
|
||||
|
||||
function Numbering.RemoveAbstractNum(_value: AbstractNum);
|
||||
begin
|
||||
reindex(abstractnum_abstractnumid_hash_, array(_value.AbstractNumId: nil));
|
||||
abstractnum_count_--;
|
||||
end;
|
||||
|
||||
function Numbering.GetNumByNumId(_key: string);
|
||||
begin
|
||||
return num_numid_hash_[_key];
|
||||
|
|
@ -446,4 +518,10 @@ begin
|
|||
num_count_++;
|
||||
end;
|
||||
|
||||
function Numbering.RemoveNum(_value: Num);
|
||||
begin
|
||||
reindex(num_numid_hash_, array(_value.NumId: nil));
|
||||
num_count_--;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
|
@ -641,6 +641,15 @@ private
|
|||
object_: PgNumType;
|
||||
end;
|
||||
|
||||
type PgBordersUnitDecorator = class(PgBorders)
|
||||
public
|
||||
function create(_obj: PgBorders);
|
||||
function GetObject();
|
||||
function Convert();
|
||||
private
|
||||
object_: PgBorders;
|
||||
end;
|
||||
|
||||
type PgSzUnitDecorator = class(PgSz)
|
||||
public
|
||||
function create(_obj: PgSz);
|
||||
|
|
@ -911,13 +920,13 @@ private
|
|||
object_: PPrDefault;
|
||||
end;
|
||||
|
||||
type LatenStylesUnitDecorator = class(LatenStyles)
|
||||
type LatentStylesUnitDecorator = class(LatentStyles)
|
||||
public
|
||||
function create(_obj: LatenStyles);
|
||||
function create(_obj: LatentStyles);
|
||||
function GetObject();
|
||||
function Convert();
|
||||
private
|
||||
object_: LatenStyles;
|
||||
object_: LatentStyles;
|
||||
end;
|
||||
|
||||
type LsdExceptionUnitDecorator = class(LsdException)
|
||||
|
|
@ -2779,6 +2788,8 @@ function TrPrUnitDecorator.Convert();
|
|||
begin
|
||||
tslassigning_backup := tslassigning;
|
||||
tslassigning := 1;
|
||||
if not ifnil(object_.XmlChildTblCellSpacing) then
|
||||
{self.}XmlChildTblCellSpacing := new TblCellSpacingUnitDecorator(object_.XmlChildTblCellSpacing);
|
||||
if not ifnil(object_.XmlChildTrHeight) then
|
||||
{self.}XmlChildTrHeight := new TrHeightUnitDecorator(object_.XmlChildTrHeight);
|
||||
if not ifnil(object_.XmlChildTblHeader) then
|
||||
|
|
@ -3227,6 +3238,8 @@ begin
|
|||
{self.}XmlChildPgMar := new PgMarUnitDecorator(object_.XmlChildPgMar);
|
||||
if not ifnil(object_.XmlChildPgNumType) then
|
||||
{self.}XmlChildPgNumType := new PgNumTypeUnitDecorator(object_.XmlChildPgNumType);
|
||||
if not ifnil(object_.XmlChildPgBorders) then
|
||||
{self.}XmlChildPgBorders := new PgBordersUnitDecorator(object_.XmlChildPgBorders);
|
||||
if not ifnil(object_.XmlChildCols) then
|
||||
{self.}XmlChildCols := new ColsUnitDecorator(object_.XmlChildCols);
|
||||
if not ifnil(object_.XmlChildTitlePg) then
|
||||
|
|
@ -3282,6 +3295,39 @@ begin
|
|||
tslassigning := tslassigning_backup;
|
||||
end;
|
||||
|
||||
function PgBordersUnitDecorator.create(_obj: PgBorders);
|
||||
begin
|
||||
class(PgBorders).create();
|
||||
object_ := _obj;
|
||||
{self.}Convert();
|
||||
end;
|
||||
|
||||
function PgBordersUnitDecorator.GetObject();
|
||||
begin
|
||||
return object_;
|
||||
end;
|
||||
|
||||
function PgBordersUnitDecorator.Convert();
|
||||
begin
|
||||
tslassigning_backup := tslassigning;
|
||||
tslassigning := 1;
|
||||
if not ifnil(object_.XmlAttrOffsetFrom) then
|
||||
{self.}OffsetFrom := object_.XmlAttrOffsetFrom.Value;
|
||||
if not ifnil(object_.XmlAttrDisplay) then
|
||||
{self.}Display := object_.XmlAttrDisplay.Value;
|
||||
if not ifnil(object_.XmlAttrZOrder) then
|
||||
{self.}ZOrder := object_.XmlAttrZOrder.Value;
|
||||
if not ifnil(object_.XmlChildTop) then
|
||||
{self.}XmlChildTop := new BdrUnitDecorator(object_.XmlChildTop);
|
||||
if not ifnil(object_.XmlChildLeft) then
|
||||
{self.}XmlChildLeft := new BdrUnitDecorator(object_.XmlChildLeft);
|
||||
if not ifnil(object_.XmlChildRight) then
|
||||
{self.}XmlChildRight := new BdrUnitDecorator(object_.XmlChildRight);
|
||||
if not ifnil(object_.XmlChildBottom) then
|
||||
{self.}XmlChildBottom := new BdrUnitDecorator(object_.XmlChildBottom);
|
||||
tslassigning := tslassigning_backup;
|
||||
end;
|
||||
|
||||
function PgSzUnitDecorator.create(_obj: PgSz);
|
||||
begin
|
||||
class(PgSz).create();
|
||||
|
|
@ -4054,8 +4100,8 @@ begin
|
|||
{self.}Ignorable := object_.XmlAttrIgnorable.Value;
|
||||
if not ifnil(object_.XmlChildDocDefaults) then
|
||||
{self.}XmlChildDocDefaults := new DocDefaultsUnitDecorator(object_.XmlChildDocDefaults);
|
||||
if not ifnil(object_.XmlChildLatenStyles) then
|
||||
{self.}XmlChildLatenStyles := new LatenStylesUnitDecorator(object_.XmlChildLatenStyles);
|
||||
if not ifnil(object_.XmlChildLatentStyles) then
|
||||
{self.}XmlChildLatentStyles := new LatentStylesUnitDecorator(object_.XmlChildLatentStyles);
|
||||
elems := object_.Styles();
|
||||
for _,elem in elems do
|
||||
{self.}AppendChild(new StyleUnitDecorator(elem));
|
||||
|
|
@ -4127,19 +4173,19 @@ begin
|
|||
tslassigning := tslassigning_backup;
|
||||
end;
|
||||
|
||||
function LatenStylesUnitDecorator.create(_obj: LatenStyles);
|
||||
function LatentStylesUnitDecorator.create(_obj: LatentStyles);
|
||||
begin
|
||||
class(LatenStyles).create();
|
||||
class(LatentStyles).create();
|
||||
object_ := _obj;
|
||||
{self.}Convert();
|
||||
end;
|
||||
|
||||
function LatenStylesUnitDecorator.GetObject();
|
||||
function LatentStylesUnitDecorator.GetObject();
|
||||
begin
|
||||
return object_;
|
||||
end;
|
||||
|
||||
function LatenStylesUnitDecorator.Convert();
|
||||
function LatentStylesUnitDecorator.Convert();
|
||||
begin
|
||||
tslassigning_backup := tslassigning;
|
||||
tslassigning := 1;
|
||||
|
|
@ -4179,8 +4225,8 @@ begin
|
|||
tslassigning := 1;
|
||||
if not ifnil(object_.XmlAttrName) then
|
||||
{self.}Name := object_.XmlAttrName.Value;
|
||||
if not ifnil(object_.XmlAttrUIPriority) then
|
||||
{self.}UIPriority := object_.XmlAttrUIPriority.Value;
|
||||
if not ifnil(object_.XmlAttrUiPriority) then
|
||||
{self.}UiPriority := object_.XmlAttrUiPriority.Value;
|
||||
if not ifnil(object_.XmlAttrSemiHidden) then
|
||||
{self.}SemiHidden := object_.XmlAttrSemiHidden.Value;
|
||||
if not ifnil(object_.XmlAttrUnhideWhenUsed) then
|
||||
|
|
@ -4212,18 +4258,22 @@ begin
|
|||
{self.}Default := object_.XmlAttrDefault.Value;
|
||||
if not ifnil(object_.XmlAttrStyleId) then
|
||||
{self.}StyleId := object_.XmlAttrStyleId.Value;
|
||||
if not ifnil(object_.XmlAttrCustomStyle) then
|
||||
{self.}CustomStyle := object_.XmlAttrCustomStyle.Value;
|
||||
if not ifnil(object_.XmlChildName) then
|
||||
{self.}XmlChildName := new PureWValUnitDecorator(object_.XmlChildName);
|
||||
if not ifnil(object_.XmlChildBasedOn) then
|
||||
{self.}XmlChildBasedOn := new PureWValUnitDecorator(object_.XmlChildBasedOn);
|
||||
if not ifnil(object_.XmlChildLocked) then
|
||||
{self.}Locked.Copy(object_.XmlChildLocked);
|
||||
if not ifnil(object_.XmlChildNext) then
|
||||
{self.}XmlChildNext := new PureWValUnitDecorator(object_.XmlChildNext);
|
||||
if not ifnil(object_.XmlChildAutoRedefine) then
|
||||
{self.}XmlChildAutoRedefine := new PureWValUnitDecorator(object_.XmlChildAutoRedefine);
|
||||
if not ifnil(object_.XmlChildLink) then
|
||||
{self.}XmlChildLink := new PureWValUnitDecorator(object_.XmlChildLink);
|
||||
if not ifnil(object_.XmlChildUIPriority) then
|
||||
{self.}XmlChildUIPriority := new PureWValUnitDecorator(object_.XmlChildUIPriority);
|
||||
if not ifnil(object_.XmlChildUiPriority) then
|
||||
{self.}XmlChildUiPriority := new PureWValUnitDecorator(object_.XmlChildUiPriority);
|
||||
if not ifnil(object_.XmlChildSemiHidden) then
|
||||
{self.}SemiHidden.Copy(object_.XmlChildSemiHidden);
|
||||
if not ifnil(object_.XmlChildUnhideWhenUsed) then
|
||||
|
|
@ -4624,6 +4674,8 @@ begin
|
|||
tslassigning := 1;
|
||||
if not ifnil(object_.XmlAttrNumId) then
|
||||
{self.}NumId := object_.XmlAttrNumId.Value;
|
||||
if not ifnil(object_.XmlAttrDurableId) then
|
||||
{self.}DurableId := object_.XmlAttrDurableId.Value;
|
||||
if not ifnil(object_.XmlChildAbstractNumId) then
|
||||
{self.}XmlChildAbstractNumId := new PureWValUnitDecorator(object_.XmlChildAbstractNumId);
|
||||
tslassigning := tslassigning_backup;
|
||||
|
|
|
|||
|
|
@ -335,7 +335,7 @@ public
|
|||
// multi property
|
||||
property Fonts read ReadFonts write WriteFonts;
|
||||
function ReadFonts(_index: integer);
|
||||
function WriteFonts(_index: integer; _value: nil_OR_Font);
|
||||
function WriteFonts(_index: integer; _value: nil__Font);
|
||||
function AddFont(): Font;
|
||||
function AppendFont(): Font;
|
||||
|
||||
|
|
@ -429,9 +429,9 @@ public
|
|||
property SolidFills read ReadSolidFills write WriteSolidFills;
|
||||
property GradFills read ReadGradFills write WriteGradFills;
|
||||
function ReadSolidFills(_index: integer);
|
||||
function WriteSolidFills(_index: integer; _value: nil_OR_SolidFill);
|
||||
function WriteSolidFills(_index: integer; _value: nil__SolidFill);
|
||||
function ReadGradFills(_index: integer);
|
||||
function WriteGradFills(_index: integer; _value: nil_OR_GradFill);
|
||||
function WriteGradFills(_index: integer; _value: nil__GradFill);
|
||||
function AddSolidFill(): SolidFill;
|
||||
function AddGradFill(): GradFill;
|
||||
function AppendSolidFill(): SolidFill;
|
||||
|
|
@ -548,7 +548,7 @@ public
|
|||
// multi property
|
||||
property Gses read ReadGses write WriteGses;
|
||||
function ReadGses(_index: integer);
|
||||
function WriteGses(_index: integer; _value: nil_OR_Gs);
|
||||
function WriteGses(_index: integer; _value: nil__Gs);
|
||||
function AddGs(): Gs;
|
||||
function AppendGs(): Gs;
|
||||
|
||||
|
|
@ -626,7 +626,7 @@ public
|
|||
// multi property
|
||||
property Lns read ReadLns write WriteLns;
|
||||
function ReadLns(_index: integer);
|
||||
function WriteLns(_index: integer; _value: nil_OR_Ln);
|
||||
function WriteLns(_index: integer; _value: nil__Ln);
|
||||
function AddLn(): Ln;
|
||||
function AppendLn(): Ln;
|
||||
|
||||
|
|
@ -649,7 +649,7 @@ public
|
|||
// multi property
|
||||
property EffectStyles read ReadEffectStyles write WriteEffectStyles;
|
||||
function ReadEffectStyles(_index: integer);
|
||||
function WriteEffectStyles(_index: integer; _value: nil_OR_EffectStyle);
|
||||
function WriteEffectStyles(_index: integer; _value: nil__EffectStyle);
|
||||
function AddEffectStyle(): EffectStyle;
|
||||
function AppendEffectStyle(): EffectStyle;
|
||||
|
||||
|
|
@ -739,7 +739,7 @@ public
|
|||
// multi property
|
||||
property Exts read ReadExts write WriteExts;
|
||||
function ReadExts(_index: integer);
|
||||
function WriteExts(_index: integer; _value: nil_OR_Ext);
|
||||
function WriteExts(_index: integer; _value: nil__Ext);
|
||||
function AddExt(): Ext;
|
||||
function AppendExt(): Ext;
|
||||
|
||||
|
|
@ -1103,9 +1103,9 @@ public
|
|||
property Sers read ReadSers write WriteSers;
|
||||
property AxIds read ReadAxIds write WriteAxIds;
|
||||
function ReadSers(_index: integer);
|
||||
function WriteSers(_index: integer; _value: nil_OR_Ser);
|
||||
function WriteSers(_index: integer; _value: nil__Ser);
|
||||
function ReadAxIds(_index: integer);
|
||||
function WriteAxIds(_index: integer; _value: nil_OR_PureVal);
|
||||
function WriteAxIds(_index: integer; _value: nil__PureVal);
|
||||
function AddSer(): Ser;
|
||||
function AddAxId(): PureVal;
|
||||
function AppendSer(): Ser;
|
||||
|
|
@ -1343,7 +1343,7 @@ public
|
|||
// multi property
|
||||
property Pts read ReadPts write WritePts;
|
||||
function ReadPts(_index: integer);
|
||||
function WritePts(_index: integer; _value: nil_OR_Pt);
|
||||
function WritePts(_index: integer; _value: nil__Pt);
|
||||
function AddPt(): Pt;
|
||||
function AppendPt(): Pt;
|
||||
|
||||
|
|
@ -1377,7 +1377,7 @@ public
|
|||
// multi property
|
||||
property Pts read ReadPts write WritePts;
|
||||
function ReadPts(_index: integer);
|
||||
function WritePts(_index: integer; _value: nil_OR_Pt);
|
||||
function WritePts(_index: integer; _value: nil__Pt);
|
||||
function AddPt(): Pt;
|
||||
function AppendPt(): Pt;
|
||||
|
||||
|
|
@ -1613,7 +1613,7 @@ public
|
|||
// multi property
|
||||
property Ps read ReadPs write WritePs;
|
||||
function ReadPs(_index: integer);
|
||||
function WritePs(_index: integer; _value: nil_OR_P);
|
||||
function WritePs(_index: integer; _value: nil__P);
|
||||
function AddP(): P;
|
||||
function AppendP(): P;
|
||||
|
||||
|
|
@ -1706,7 +1706,7 @@ public
|
|||
// multi property
|
||||
property Ps read ReadPs write WritePs;
|
||||
function ReadPs(_index: integer);
|
||||
function WritePs(_index: integer; _value: nil_OR_P);
|
||||
function WritePs(_index: integer; _value: nil__P);
|
||||
function AddP(): P;
|
||||
function AppendP(): P;
|
||||
|
||||
|
|
@ -1871,7 +1871,7 @@ public
|
|||
// multi property
|
||||
property Rs read ReadRs write WriteRs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function AddR(): R;
|
||||
function AppendR(): R;
|
||||
|
||||
|
|
@ -4817,7 +4817,7 @@ begin
|
|||
return container_.Get(pre + "font", ind);
|
||||
end;
|
||||
|
||||
function MFont.WriteFonts(_index: integer; _value: nil_OR_Font);
|
||||
function MFont.WriteFonts(_index: integer; _value: nil__Font);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5214,7 +5214,7 @@ begin
|
|||
return container_.Get(pre + "solidFill", ind);
|
||||
end;
|
||||
|
||||
function FillStyleLst.WriteSolidFills(_index: integer; _value: nil_OR_SolidFill);
|
||||
function FillStyleLst.WriteSolidFills(_index: integer; _value: nil__SolidFill);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5240,7 +5240,7 @@ begin
|
|||
return container_.Get(pre + "gradFill", ind);
|
||||
end;
|
||||
|
||||
function FillStyleLst.WriteGradFills(_index: integer; _value: nil_OR_GradFill);
|
||||
function FillStyleLst.WriteGradFills(_index: integer; _value: nil__GradFill);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5759,7 +5759,7 @@ begin
|
|||
return container_.Get(pre + "gs", ind);
|
||||
end;
|
||||
|
||||
function GsLst.WriteGses(_index: integer; _value: nil_OR_Gs);
|
||||
function GsLst.WriteGses(_index: integer; _value: nil__Gs);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6047,7 +6047,7 @@ begin
|
|||
return container_.Get(pre + "ln", ind);
|
||||
end;
|
||||
|
||||
function LnStyleLst.WriteLns(_index: integer; _value: nil_OR_Ln);
|
||||
function LnStyleLst.WriteLns(_index: integer; _value: nil__Ln);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6141,7 +6141,7 @@ begin
|
|||
return container_.Get(pre + "effectStyle", ind);
|
||||
end;
|
||||
|
||||
function EffectStyleLst.WriteEffectStyles(_index: integer; _value: nil_OR_EffectStyle);
|
||||
function EffectStyleLst.WriteEffectStyles(_index: integer; _value: nil__EffectStyle);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6511,7 +6511,7 @@ begin
|
|||
return container_.Get(pre + "ext", ind);
|
||||
end;
|
||||
|
||||
function ExtLst.WriteExts(_index: integer; _value: nil_OR_Ext);
|
||||
function ExtLst.WriteExts(_index: integer; _value: nil__Ext);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8426,7 +8426,7 @@ begin
|
|||
return container_.Get(pre + "ser", ind);
|
||||
end;
|
||||
|
||||
function BarChart.WriteSers(_index: integer; _value: nil_OR_Ser);
|
||||
function BarChart.WriteSers(_index: integer; _value: nil__Ser);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8452,7 +8452,7 @@ begin
|
|||
return container_.Get(pre + "axId", ind);
|
||||
end;
|
||||
|
||||
function BarChart.WriteAxIds(_index: integer; _value: nil_OR_PureVal);
|
||||
function BarChart.WriteAxIds(_index: integer; _value: nil__PureVal);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -9719,7 +9719,7 @@ begin
|
|||
return container_.Get(pre + "pt", ind);
|
||||
end;
|
||||
|
||||
function StrCache.WritePts(_index: integer; _value: nil_OR_Pt);
|
||||
function StrCache.WritePts(_index: integer; _value: nil__Pt);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -9885,7 +9885,7 @@ begin
|
|||
return container_.Get(pre + "pt", ind);
|
||||
end;
|
||||
|
||||
function NumCache.WritePts(_index: integer; _value: nil_OR_Pt);
|
||||
function NumCache.WritePts(_index: integer; _value: nil__Pt);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -11205,7 +11205,7 @@ begin
|
|||
return container_.Get("a:p", ind);
|
||||
end;
|
||||
|
||||
function TxPr.WritePs(_index: integer; _value: nil_OR_P);
|
||||
function TxPr.WritePs(_index: integer; _value: nil__P);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -11649,7 +11649,7 @@ begin
|
|||
return container_.Get("a:p", ind);
|
||||
end;
|
||||
|
||||
function Rich.WritePs(_index: integer; _value: nil_OR_P);
|
||||
function Rich.WritePs(_index: integer; _value: nil__P);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -12412,7 +12412,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function P.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function P.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
|
|||
|
|
@ -1,6 +0,0 @@
|
|||
unit PptxMLAdapter;
|
||||
interface
|
||||
|
||||
implementation
|
||||
|
||||
end.
|
||||
|
|
@ -158,21 +158,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -707,7 +707,7 @@ public
|
|||
// multi property
|
||||
property Rs read ReadRs write WriteRs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function AddR(): R;
|
||||
function AppendR(): R;
|
||||
|
||||
|
|
@ -854,7 +854,7 @@ public
|
|||
// multi property
|
||||
property Relationships read ReadRelationships write WriteRelationships;
|
||||
function ReadRelationships(_index: integer);
|
||||
function WriteRelationships(_index: integer; _value: nil_OR_Relationship);
|
||||
function WriteRelationships(_index: integer; _value: nil__Relationship);
|
||||
function AddRelationship(): Relationship;
|
||||
function AppendRelationship(): Relationship;
|
||||
|
||||
|
|
@ -908,13 +908,13 @@ public
|
|||
property Defaults read ReadDefaults write WriteDefaults;
|
||||
property Overrides read ReadOverrides write WriteOverrides;
|
||||
function ReadDefaults(_index: integer);
|
||||
function WriteDefaults(_index: integer; _value: nil_OR_Default);
|
||||
function WriteDefaults(_index: integer; _value: nil__Default);
|
||||
function ReadOverrides(_index: integer);
|
||||
function WriteOverrides(_index: integer; _value: nil_OR__Override);
|
||||
function WriteOverrides(_index: integer; _value: nil___Override);
|
||||
function AddDefault(): Default;
|
||||
function AddOverride(): _Override;
|
||||
function Add_Override(): _Override;
|
||||
function AppendDefault(): Default;
|
||||
function AppendOverride(): _Override;
|
||||
function Append_Override(): _Override;
|
||||
|
||||
public
|
||||
// Children
|
||||
|
|
@ -999,21 +999,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -1063,21 +1063,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -1127,21 +1127,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -1191,21 +1191,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -1255,21 +1255,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -1319,21 +1319,21 @@ public
|
|||
property Naries read ReadNaries write WriteNaries;
|
||||
property Funcs read ReadFuncs write WriteFuncs;
|
||||
function ReadRs(_index: integer);
|
||||
function WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function WriteRs(_index: integer; _value: nil__R);
|
||||
function ReadDs(_index: integer);
|
||||
function WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function WriteDs(_index: integer; _value: nil__D);
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function ReadRads(_index: integer);
|
||||
function WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function WriteRads(_index: integer; _value: nil__Rad);
|
||||
function ReadSSubs(_index: integer);
|
||||
function WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
function ReadSSups(_index: integer);
|
||||
function WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function WriteSSups(_index: integer; _value: nil__SSup);
|
||||
function ReadNaries(_index: integer);
|
||||
function WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function WriteNaries(_index: integer; _value: nil__Nary);
|
||||
function ReadFuncs(_index: integer);
|
||||
function WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function WriteFuncs(_index: integer; _value: nil__Func);
|
||||
function AddR(): R;
|
||||
function AddD(): D;
|
||||
function AddF(): F;
|
||||
|
|
@ -2157,7 +2157,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function OMath.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2183,7 +2183,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function OMath.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2209,7 +2209,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function OMath.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2235,7 +2235,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function OMath.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2261,7 +2261,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function OMath.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2287,7 +2287,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function OMath.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2313,7 +2313,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function OMath.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -2339,7 +2339,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function OMath.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function OMath.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5114,7 +5114,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function FName.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function FName.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5803,7 +5803,7 @@ begin
|
|||
return container_.Get("Relationship", ind);
|
||||
end;
|
||||
|
||||
function Relationships.WriteRelationships(_index: integer; _value: nil_OR_Relationship);
|
||||
function Relationships.WriteRelationships(_index: integer; _value: nil__Relationship);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -5968,7 +5968,7 @@ begin
|
|||
);
|
||||
sorted_child_ := array(
|
||||
"Default": array(0, makeweakref(thisFunction(AppendDefault))),
|
||||
"Override": array(1, makeweakref(thisFunction(AppendOverride))),
|
||||
"Override": array(1, makeweakref(thisFunction(Append_Override))),
|
||||
);
|
||||
container_ := new TSOfficeContainer(sorted_child_);
|
||||
end;
|
||||
|
|
@ -6007,7 +6007,7 @@ begin
|
|||
return container_.Get("Default", ind);
|
||||
end;
|
||||
|
||||
function Types.WriteDefaults(_index: integer; _value: nil_OR_Default);
|
||||
function Types.WriteDefaults(_index: integer; _value: nil__Default);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6033,7 +6033,7 @@ begin
|
|||
return container_.Get("Override", ind);
|
||||
end;
|
||||
|
||||
function Types.WriteOverrides(_index: integer; _value: nil_OR__Override);
|
||||
function Types.WriteOverrides(_index: integer; _value: nil___Override);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6060,7 +6060,7 @@ begin
|
|||
return obj;
|
||||
end;
|
||||
|
||||
function Types.AddOverride(): _Override;
|
||||
function Types.Add_Override(): _Override;
|
||||
begin
|
||||
obj := new _Override(self, "", "Override");
|
||||
obj.Enable := true;
|
||||
|
|
@ -6076,7 +6076,7 @@ begin
|
|||
return obj;
|
||||
end;
|
||||
|
||||
function Types.AppendOverride(): _Override;
|
||||
function Types.Append_Override(): _Override;
|
||||
begin
|
||||
obj := new _Override(self, "", "Override");
|
||||
obj.Enable := true;
|
||||
|
|
@ -6383,7 +6383,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function Num.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6409,7 +6409,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function Num.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6435,7 +6435,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Num.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6461,7 +6461,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function Num.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6487,7 +6487,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function Num.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6513,7 +6513,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function Num.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6539,7 +6539,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function Num.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6565,7 +6565,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function Num.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function Num.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6839,7 +6839,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function Deg.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6865,7 +6865,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function Deg.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6891,7 +6891,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Deg.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6917,7 +6917,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function Deg.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6943,7 +6943,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function Deg.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6969,7 +6969,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function Deg.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -6995,7 +6995,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function Deg.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7021,7 +7021,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function Deg.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function Deg.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7295,7 +7295,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function E.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function E.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7321,7 +7321,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function E.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function E.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7347,7 +7347,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function E.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function E.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7373,7 +7373,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function E.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function E.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7399,7 +7399,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function E.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function E.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7425,7 +7425,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function E.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function E.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7451,7 +7451,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function E.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function E.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7477,7 +7477,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function E.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function E.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7751,7 +7751,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function Sup.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7777,7 +7777,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function Sup.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7803,7 +7803,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Sup.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7829,7 +7829,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function Sup.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7855,7 +7855,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function Sup.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7881,7 +7881,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function Sup.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7907,7 +7907,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function Sup.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -7933,7 +7933,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function Sup.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function Sup.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8207,7 +8207,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function Den.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8233,7 +8233,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function Den.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8259,7 +8259,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Den.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8285,7 +8285,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function Den.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8311,7 +8311,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function Den.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8337,7 +8337,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function Den.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8363,7 +8363,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function Den.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8389,7 +8389,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function Den.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function Den.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8663,7 +8663,7 @@ begin
|
|||
return container_.Get(pre + "r", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteRs(_index: integer; _value: nil_OR_R);
|
||||
function Sub.WriteRs(_index: integer; _value: nil__R);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8689,7 +8689,7 @@ begin
|
|||
return container_.Get(pre + "d", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteDs(_index: integer; _value: nil_OR_D);
|
||||
function Sub.WriteDs(_index: integer; _value: nil__D);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8715,7 +8715,7 @@ begin
|
|||
return container_.Get(pre + "f", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Sub.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8741,7 +8741,7 @@ begin
|
|||
return container_.Get(pre + "rad", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteRads(_index: integer; _value: nil_OR_Rad);
|
||||
function Sub.WriteRads(_index: integer; _value: nil__Rad);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8767,7 +8767,7 @@ begin
|
|||
return container_.Get(pre + "sSub", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteSSubs(_index: integer; _value: nil_OR_SSub);
|
||||
function Sub.WriteSSubs(_index: integer; _value: nil__SSub);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8793,7 +8793,7 @@ begin
|
|||
return container_.Get(pre + "sSup", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteSSups(_index: integer; _value: nil_OR_SSup);
|
||||
function Sub.WriteSSups(_index: integer; _value: nil__SSup);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8819,7 +8819,7 @@ begin
|
|||
return container_.Get(pre + "nary", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteNaries(_index: integer; _value: nil_OR_Nary);
|
||||
function Sub.WriteNaries(_index: integer; _value: nil__Nary);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
@ -8845,7 +8845,7 @@ begin
|
|||
return container_.Get(pre + "func", ind);
|
||||
end;
|
||||
|
||||
function Sub.WriteFuncs(_index: integer; _value: nil_OR_Func);
|
||||
function Sub.WriteFuncs(_index: integer; _value: nil__Func);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
|
|||
|
|
@ -9,6 +9,7 @@ public
|
|||
function GetRelationshipById(_key: string);
|
||||
function GetRelationshipByTarget(_key: string);
|
||||
function AddRelationship(_value: Relationship);
|
||||
function RemoveRelationship(_value: Relationship);
|
||||
|
||||
property RelationshipCount: uinteger read relationship_count_;
|
||||
|
||||
|
|
@ -26,18 +27,20 @@ public
|
|||
|
||||
function GetDefaultByExtension(_key: string);
|
||||
function AddDefault(_value: Default);
|
||||
function GetOverrideByPartName(_key: string);
|
||||
function AddOverride(_value: Override);
|
||||
function RemoveDefault(_value: Default);
|
||||
function Get_OverrideByPartName(_key: string);
|
||||
function Add_Override(_value: _Override);
|
||||
function Remove_Override(_value: _Override);
|
||||
|
||||
property DefaultCount: uinteger read default_count_;
|
||||
property OverrideCount: uinteger read override_count_;
|
||||
property _OverrideCount: uinteger read _override_count_;
|
||||
|
||||
private
|
||||
object_: Types;
|
||||
default_extension_hash_: hash;
|
||||
default_count_: uinteger;
|
||||
override_partname_hash_: hash;
|
||||
override_count_: uinteger;
|
||||
_override_partname_hash_: hash;
|
||||
_override_count_: uinteger;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
|
@ -54,11 +57,11 @@ end;
|
|||
function Relationships.Init();
|
||||
begin
|
||||
elements := object_.Relationships();
|
||||
relationship_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
begin
|
||||
relationship_id_hash_[v.Id] := v;
|
||||
relationship_target_hash_[v.Target] := v;
|
||||
relationship_count_++;
|
||||
end
|
||||
end;
|
||||
|
||||
|
|
@ -79,26 +82,33 @@ begin
|
|||
relationship_count_++;
|
||||
end;
|
||||
|
||||
function Relationships.RemoveRelationship(_value: Relationship);
|
||||
begin
|
||||
reindex(relationship_id_hash_, array(_value.Id: nil));
|
||||
reindex(relationship_target_hash_, array(_value.Target: nil));
|
||||
relationship_count_--;
|
||||
end;
|
||||
|
||||
function Types.create(_obj: Types);
|
||||
begin
|
||||
object_ := _obj;
|
||||
default_count_ := 0;
|
||||
default_extension_hash_ := array();
|
||||
override_count_ := 0;
|
||||
override_partname_hash_ := array();
|
||||
_override_count_ := 0;
|
||||
_override_partname_hash_ := array();
|
||||
{self.}Init();
|
||||
end;
|
||||
|
||||
function Types.Init();
|
||||
begin
|
||||
elements := object_.Defaults();
|
||||
default_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
default_extension_hash_[v.Extension] := v;
|
||||
default_count_++;
|
||||
elements := object_.Overrides();
|
||||
_override_count_ := length(elements);
|
||||
for k,v in elements do
|
||||
override_partname_hash_[v.PartName] := v;
|
||||
override_count_++;
|
||||
_override_partname_hash_[v.PartName] := v;
|
||||
end;
|
||||
|
||||
function Types.GetDefaultByExtension(_key: string);
|
||||
|
|
@ -112,15 +122,27 @@ begin
|
|||
default_count_++;
|
||||
end;
|
||||
|
||||
function Types.GetOverrideByPartName(_key: string);
|
||||
function Types.RemoveDefault(_value: Default);
|
||||
begin
|
||||
return override_partname_hash_[_key];
|
||||
reindex(default_extension_hash_, array(_value.Extension: nil));
|
||||
default_count_--;
|
||||
end;
|
||||
|
||||
function Types.AddOverride(_value: Override);
|
||||
function Types.Get_OverrideByPartName(_key: string);
|
||||
begin
|
||||
override_partname_hash_[_value.PartName] := _value;
|
||||
override_count_++;
|
||||
return _override_partname_hash_[_key];
|
||||
end;
|
||||
|
||||
function Types.Add_Override(_value: _Override);
|
||||
begin
|
||||
_override_partname_hash_[_value.PartName] := _value;
|
||||
_override_count_++;
|
||||
end;
|
||||
|
||||
function Types.Remove_Override(_value: _Override);
|
||||
begin
|
||||
reindex(_override_partname_hash_, array(_value.PartName: nil));
|
||||
_override_count_--;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
|
@ -98,7 +98,7 @@ public
|
|||
// multi property
|
||||
property Fs read ReadFs write WriteFs;
|
||||
function ReadFs(_index: integer);
|
||||
function WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function WriteFs(_index: integer; _value: nil__F);
|
||||
function AddF(): F;
|
||||
function AppendF(): F;
|
||||
|
||||
|
|
@ -1031,7 +1031,7 @@ begin
|
|||
return container_.Get("v:f", ind);
|
||||
end;
|
||||
|
||||
function Formulas.WriteFs(_index: integer; _value: nil_OR_F);
|
||||
function Formulas.WriteFs(_index: integer; _value: nil__F);
|
||||
begin
|
||||
if ifnil(_value) then
|
||||
begin
|
||||
|
|
|
|||
Loading…
Reference in New Issue