OfficeXml/autoclass/docx/CnfStyle@DOCX.tsf

298 lines
9.9 KiB
Plaintext

type CnfStyle = 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: CnfStyle);override;
property Val read ReadXmlAttrVal write WriteXmlAttrVal;
property FirstRow read ReadXmlAttrFirstRow write WriteXmlAttrFirstRow;
property LastRow read ReadXmlAttrLastRow write WriteXmlAttrLastRow;
property FirstColumn read ReadXmlAttrFirstColumn write WriteXmlAttrFirstColumn;
property LastColumn read ReadXmlAttrLastColumn write WriteXmlAttrLastColumn;
property OddVBand read ReadXmlAttrOddVBand write WriteXmlAttrOddVBand;
property EvenVBand read ReadXmlAttrEvenVBand write WriteXmlAttrEvenVBand;
property OddHBand read ReadXmlAttrOddHBand write WriteXmlAttrOddHBand;
property EvenHBand read ReadXmlAttrEvenHBand write WriteXmlAttrEvenHBand;
property FirstRowFirstColumn read ReadXmlAttrFirstRowFirstColumn write WriteXmlAttrFirstRowFirstColumn;
property FirstRowLastColumn read ReadXmlAttrFirstRowLastColumn write WriteXmlAttrFirstRowLastColumn;
property LastRowFirstColumn read ReadXmlAttrLastRowFirstColumn write WriteXmlAttrLastRowFirstColumn;
property LastRowLastColumn read ReadXmlAttrLastRowLastColumn write WriteXmlAttrLastRowLastColumn;
function ReadXmlAttrVal();
function WriteXmlAttrVal(_value);
function ReadXmlAttrFirstRow();
function WriteXmlAttrFirstRow(_value);
function ReadXmlAttrLastRow();
function WriteXmlAttrLastRow(_value);
function ReadXmlAttrFirstColumn();
function WriteXmlAttrFirstColumn(_value);
function ReadXmlAttrLastColumn();
function WriteXmlAttrLastColumn(_value);
function ReadXmlAttrOddVBand();
function WriteXmlAttrOddVBand(_value);
function ReadXmlAttrEvenVBand();
function WriteXmlAttrEvenVBand(_value);
function ReadXmlAttrOddHBand();
function WriteXmlAttrOddHBand(_value);
function ReadXmlAttrEvenHBand();
function WriteXmlAttrEvenHBand(_value);
function ReadXmlAttrFirstRowFirstColumn();
function WriteXmlAttrFirstRowFirstColumn(_value);
function ReadXmlAttrFirstRowLastColumn();
function WriteXmlAttrFirstRowLastColumn(_value);
function ReadXmlAttrLastRowFirstColumn();
function WriteXmlAttrLastRowFirstColumn(_value);
function ReadXmlAttrLastRowLastColumn();
function WriteXmlAttrLastRowLastColumn(_value);
public
// Attributes
XmlAttrVal: OpenXmlAttribute;
XmlAttrFirstRow: OpenXmlAttribute;
XmlAttrLastRow: OpenXmlAttribute;
XmlAttrFirstColumn: OpenXmlAttribute;
XmlAttrLastColumn: OpenXmlAttribute;
XmlAttrOddVBand: OpenXmlAttribute;
XmlAttrEvenVBand: OpenXmlAttribute;
XmlAttrOddHBand: OpenXmlAttribute;
XmlAttrEvenHBand: OpenXmlAttribute;
XmlAttrFirstRowFirstColumn: OpenXmlAttribute;
XmlAttrFirstRowLastColumn: OpenXmlAttribute;
XmlAttrLastRowFirstColumn: OpenXmlAttribute;
XmlAttrLastRowLastColumn: OpenXmlAttribute;
// Children
end;
function CnfStyle.Create();overload;
begin
{self.}Create(nil, "w", "cnfStyle");
end;
function CnfStyle.Create(_node: XmlNode);overload;
begin
class(OpenXmlElement).Create(_node: XmlNode);
end;
function CnfStyle.Create(_parent: tslobj; _prefix: string; _local_name: string);overload;
begin
class(OpenXmlElement).Create(_parent, _prefix, _local_name);
end;
function CnfStyle.Init();override;
begin
{self.}XmlAttrVal := new OpenXmlAttribute({self.}Prefix, "val", nil);
{self.}XmlAttrFirstRow := new OpenXmlAttribute({self.}Prefix, "firstRow", nil);
{self.}XmlAttrLastRow := new OpenXmlAttribute({self.}Prefix, "lastRow", nil);
{self.}XmlAttrFirstColumn := new OpenXmlAttribute({self.}Prefix, "firstColumn", nil);
{self.}XmlAttrLastColumn := new OpenXmlAttribute({self.}Prefix, "lastColumn", nil);
{self.}XmlAttrOddVBand := new OpenXmlAttribute({self.}Prefix, "oddVBand", nil);
{self.}XmlAttrEvenVBand := new OpenXmlAttribute({self.}Prefix, "evenVBand", nil);
{self.}XmlAttrOddHBand := new OpenXmlAttribute({self.}Prefix, "oddHBand", nil);
{self.}XmlAttrEvenHBand := new OpenXmlAttribute({self.}Prefix, "evenHBand", nil);
{self.}XmlAttrFirstRowFirstColumn := new OpenXmlAttribute({self.}Prefix, "firstRowFirstColumn", nil);
{self.}XmlAttrFirstRowLastColumn := new OpenXmlAttribute({self.}Prefix, "firstRowLastColumn", nil);
{self.}XmlAttrLastRowFirstColumn := new OpenXmlAttribute({self.}Prefix, "lastRowFirstColumn", nil);
{self.}XmlAttrLastRowLastColumn := new OpenXmlAttribute({self.}Prefix, "lastRowLastColumn", nil);
end;
function CnfStyle.InitAttributes();override;
begin
attributes_ := array(
{self.}XmlAttrVal,
{self.}XmlAttrFirstRow,
{self.}XmlAttrLastRow,
{self.}XmlAttrFirstColumn,
{self.}XmlAttrLastColumn,
{self.}XmlAttrOddVBand,
{self.}XmlAttrEvenVBand,
{self.}XmlAttrOddHBand,
{self.}XmlAttrEvenHBand,
{self.}XmlAttrFirstRowFirstColumn,
{self.}XmlAttrFirstRowLastColumn,
{self.}XmlAttrLastRowFirstColumn,
{self.}XmlAttrLastRowLastColumn,
);
end;
function CnfStyle.InitChildren();override;
begin
child_elements_ := array(
);
sorted_child_ := array(
"": -1,
);
end;
function CnfStyle.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;
end;
function CnfStyle.Copy(_obj: CnfStyle);override;
begin
if not ifnil(_obj.XmlAttrVal.Value) then
{self.}XmlAttrVal.Value := _obj.XmlAttrVal.Value;
if not ifnil(_obj.XmlAttrFirstRow.Value) then
{self.}XmlAttrFirstRow.Value := _obj.XmlAttrFirstRow.Value;
if not ifnil(_obj.XmlAttrLastRow.Value) then
{self.}XmlAttrLastRow.Value := _obj.XmlAttrLastRow.Value;
if not ifnil(_obj.XmlAttrFirstColumn.Value) then
{self.}XmlAttrFirstColumn.Value := _obj.XmlAttrFirstColumn.Value;
if not ifnil(_obj.XmlAttrLastColumn.Value) then
{self.}XmlAttrLastColumn.Value := _obj.XmlAttrLastColumn.Value;
if not ifnil(_obj.XmlAttrOddVBand.Value) then
{self.}XmlAttrOddVBand.Value := _obj.XmlAttrOddVBand.Value;
if not ifnil(_obj.XmlAttrEvenVBand.Value) then
{self.}XmlAttrEvenVBand.Value := _obj.XmlAttrEvenVBand.Value;
if not ifnil(_obj.XmlAttrOddHBand.Value) then
{self.}XmlAttrOddHBand.Value := _obj.XmlAttrOddHBand.Value;
if not ifnil(_obj.XmlAttrEvenHBand.Value) then
{self.}XmlAttrEvenHBand.Value := _obj.XmlAttrEvenHBand.Value;
if not ifnil(_obj.XmlAttrFirstRowFirstColumn.Value) then
{self.}XmlAttrFirstRowFirstColumn.Value := _obj.XmlAttrFirstRowFirstColumn.Value;
if not ifnil(_obj.XmlAttrFirstRowLastColumn.Value) then
{self.}XmlAttrFirstRowLastColumn.Value := _obj.XmlAttrFirstRowLastColumn.Value;
if not ifnil(_obj.XmlAttrLastRowFirstColumn.Value) then
{self.}XmlAttrLastRowFirstColumn.Value := _obj.XmlAttrLastRowFirstColumn.Value;
if not ifnil(_obj.XmlAttrLastRowLastColumn.Value) then
{self.}XmlAttrLastRowLastColumn.Value := _obj.XmlAttrLastRowLastColumn.Value;
end;
function CnfStyle.ReadXmlAttrVal();
begin
return {self.}XmlAttrVal.Value;
end;
function CnfStyle.WriteXmlAttrVal(_value);
begin
{self.}XmlAttrVal.Value := _value;
end;
function CnfStyle.ReadXmlAttrFirstRow();
begin
return {self.}XmlAttrFirstRow.Value;
end;
function CnfStyle.WriteXmlAttrFirstRow(_value);
begin
{self.}XmlAttrFirstRow.Value := _value;
end;
function CnfStyle.ReadXmlAttrLastRow();
begin
return {self.}XmlAttrLastRow.Value;
end;
function CnfStyle.WriteXmlAttrLastRow(_value);
begin
{self.}XmlAttrLastRow.Value := _value;
end;
function CnfStyle.ReadXmlAttrFirstColumn();
begin
return {self.}XmlAttrFirstColumn.Value;
end;
function CnfStyle.WriteXmlAttrFirstColumn(_value);
begin
{self.}XmlAttrFirstColumn.Value := _value;
end;
function CnfStyle.ReadXmlAttrLastColumn();
begin
return {self.}XmlAttrLastColumn.Value;
end;
function CnfStyle.WriteXmlAttrLastColumn(_value);
begin
{self.}XmlAttrLastColumn.Value := _value;
end;
function CnfStyle.ReadXmlAttrOddVBand();
begin
return {self.}XmlAttrOddVBand.Value;
end;
function CnfStyle.WriteXmlAttrOddVBand(_value);
begin
{self.}XmlAttrOddVBand.Value := _value;
end;
function CnfStyle.ReadXmlAttrEvenVBand();
begin
return {self.}XmlAttrEvenVBand.Value;
end;
function CnfStyle.WriteXmlAttrEvenVBand(_value);
begin
{self.}XmlAttrEvenVBand.Value := _value;
end;
function CnfStyle.ReadXmlAttrOddHBand();
begin
return {self.}XmlAttrOddHBand.Value;
end;
function CnfStyle.WriteXmlAttrOddHBand(_value);
begin
{self.}XmlAttrOddHBand.Value := _value;
end;
function CnfStyle.ReadXmlAttrEvenHBand();
begin
return {self.}XmlAttrEvenHBand.Value;
end;
function CnfStyle.WriteXmlAttrEvenHBand(_value);
begin
{self.}XmlAttrEvenHBand.Value := _value;
end;
function CnfStyle.ReadXmlAttrFirstRowFirstColumn();
begin
return {self.}XmlAttrFirstRowFirstColumn.Value;
end;
function CnfStyle.WriteXmlAttrFirstRowFirstColumn(_value);
begin
{self.}XmlAttrFirstRowFirstColumn.Value := _value;
end;
function CnfStyle.ReadXmlAttrFirstRowLastColumn();
begin
return {self.}XmlAttrFirstRowLastColumn.Value;
end;
function CnfStyle.WriteXmlAttrFirstRowLastColumn(_value);
begin
{self.}XmlAttrFirstRowLastColumn.Value := _value;
end;
function CnfStyle.ReadXmlAttrLastRowFirstColumn();
begin
return {self.}XmlAttrLastRowFirstColumn.Value;
end;
function CnfStyle.WriteXmlAttrLastRowFirstColumn(_value);
begin
{self.}XmlAttrLastRowFirstColumn.Value := _value;
end;
function CnfStyle.ReadXmlAttrLastRowLastColumn();
begin
return {self.}XmlAttrLastRowLastColumn.Value;
end;
function CnfStyle.WriteXmlAttrLastRowLastColumn(_value);
begin
{self.}XmlAttrLastRowLastColumn.Value := _value;
end;