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;