OfficeXml/autoclass/docx/Ax@DOCX.tsf

179 lines
5.5 KiB
Plaintext

type Ax = class(OpenXmlElement)
public
function Create();overload;
function Create(_node: XmlNode);overload;
function Create(_parent: tslobj; _prefix: string; _local_name: string);overload;
function Init();override;
function InitAttributes();override;
function InitChildren();override;
function InitNode(_node: XmlNode);override;
function Copy(_obj: Ax);override;
public
// Attributes
// Children
AxId: PureVal;
Scaling: Scaling;
_Delete: PureVal;
AxPos: PureVal;
NumFmt: NumFmt;
MajorTickMark: PureVal;
MinorTickMark: PureVal;
TickLblPos: PureVal;
SpPr: SpPr;
TxPr: TxPr;
CrossAx: PureVal;
Crosses: PureVal;
CrossBetween: PureVal;
Auto: PureVal;
LblAlgn: PureVal;
LblOffset: PureVal;
NoMultiLvlLbl: PureVal;
end;
function Ax.Create();overload;
begin
{self.}Create(nil, "c", "");
end;
function Ax.Create(_node: XmlNode);overload;
begin
class(OpenXmlElement).Create(_node: XmlNode);
end;
function Ax.Create(_parent: tslobj; _prefix: string; _local_name: string);overload;
begin
class(OpenXmlElement).Create(_parent, _prefix, _local_name);
end;
function Ax.Init();override;
begin
{self.}AxId := new PureVal(self, {self.}Prefix, "axId");
{self.}Scaling := new Scaling(self, {self.}Prefix, "scaling");
{self.}_Delete := new PureVal(self, {self.}Prefix, "delete");
{self.}AxPos := new PureVal(self, {self.}Prefix, "axPos");
{self.}NumFmt := new NumFmt(self, {self.}Prefix, "numFmt");
{self.}MajorTickMark := new PureVal(self, {self.}Prefix, "majorTickMark");
{self.}MinorTickMark := new PureVal(self, {self.}Prefix, "minorTickMark");
{self.}TickLblPos := new PureVal(self, {self.}Prefix, "tickLblPos");
{self.}SpPr := new SpPr(self, {self.}Prefix, "spPr");
{self.}TxPr := new TxPr(self, {self.}Prefix, "txPr");
{self.}CrossAx := new PureVal(self, {self.}Prefix, "crossAx");
{self.}Crosses := new PureVal(self, {self.}Prefix, "crosses");
{self.}CrossBetween := new PureVal(self, {self.}Prefix, "crossBetween");
{self.}Auto := new PureVal(self, {self.}Prefix, "auto");
{self.}LblAlgn := new PureVal(self, {self.}Prefix, "lblAlgn");
{self.}LblOffset := new PureVal(self, {self.}Prefix, "lblOffset");
{self.}NoMultiLvlLbl := new PureVal(self, {self.}Prefix, "noMultiLvlLbl");
end;
function Ax.InitAttributes();override;
begin
attributes_ := array(
);
end;
function Ax.InitChildren();override;
begin
child_elements_ := array(
0: {self.}AxId,
1: {self.}Scaling,
2: {self.}_Delete,
3: {self.}AxPos,
4: {self.}NumFmt,
5: {self.}MajorTickMark,
6: {self.}MinorTickMark,
7: {self.}TickLblPos,
8: {self.}SpPr,
9: {self.}TxPr,
10: {self.}CrossAx,
11: {self.}Crosses,
12: {self.}CrossBetween,
13: {self.}Auto,
14: {self.}LblAlgn,
15: {self.}LblOffset,
16: {self.}NoMultiLvlLbl,
);
sorted_child_ := array(
"": -1,
{self.}AxId.ElementName: 0,
{self.}Scaling.ElementName: 1,
{self.}_Delete.ElementName: 2,
{self.}AxPos.ElementName: 3,
{self.}NumFmt.ElementName: 4,
{self.}MajorTickMark.ElementName: 5,
{self.}MinorTickMark.ElementName: 6,
{self.}TickLblPos.ElementName: 7,
{self.}SpPr.ElementName: 8,
{self.}TxPr.ElementName: 9,
{self.}CrossAx.ElementName: 10,
{self.}Crosses.ElementName: 11,
{self.}CrossBetween.ElementName: 12,
{self.}Auto.ElementName: 13,
{self.}LblAlgn.ElementName: 14,
{self.}LblOffset.ElementName: 15,
{self.}NoMultiLvlLbl.ElementName: 16,
);
end;
function Ax.InitNode(_node: XmlNode);override;
begin
if ifObj({self.}XmlNode) then
for k,v in child_elements_ do v.InitNode(nil);
{self.}XmlNode := ifObj(_node) ? _node : nil;
node := ifObj(_node) ? _node.FirstChild() : nil;
flag := false;
if ifnil(child_elements_[0]) and length(child_elements_) > 0 then
begin
flag := true;
arr := child_elements_;
child_elements_ := array();
end
pre := ifString({self.}Prefix) ? {self.}Prefix + ":" : "";
while ifObj(node) do
begin
node_name := node.GetName();
pos := sorted_child_[node_name];
if ifnil(pos) or pos = -1 then
begin
obj := nil;
case node_name of
end;
if ifObj(obj) then obj.InitNode(node);
end
else if flag then
begin
obj := arr[pos];
obj.InitNode(node);
child_elements_[length(child_elements_)] := obj;
end
else begin
child_elements_[pos].InitNode(node);
end
node := node.NextElement();
end
end;
function Ax.Copy(_obj: Ax);override;
begin
{self.}AxId.Copy(_obj.AxId);
{self.}Scaling.Copy(_obj.Scaling);
{self.}_Delete.Copy(_obj._Delete);
{self.}AxPos.Copy(_obj.AxPos);
{self.}NumFmt.Copy(_obj.NumFmt);
{self.}MajorTickMark.Copy(_obj.MajorTickMark);
{self.}MinorTickMark.Copy(_obj.MinorTickMark);
{self.}TickLblPos.Copy(_obj.TickLblPos);
{self.}SpPr.Copy(_obj.SpPr);
{self.}TxPr.Copy(_obj.TxPr);
{self.}CrossAx.Copy(_obj.CrossAx);
{self.}Crosses.Copy(_obj.Crosses);
{self.}CrossBetween.Copy(_obj.CrossBetween);
{self.}Auto.Copy(_obj.Auto);
{self.}LblAlgn.Copy(_obj.LblAlgn);
{self.}LblOffset.Copy(_obj.LblOffset);
{self.}NoMultiLvlLbl.Copy(_obj.NoMultiLvlLbl);
end;