OfficeXml/autoclass/docx/Sig@DOCX.tsf

172 lines
4.5 KiB
Plaintext

type Sig = 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: Sig);override;
property Usb0 read ReadXmlAttrUsb0 write WriteXmlAttrUsb0;
property Usb1 read ReadXmlAttrUsb1 write WriteXmlAttrUsb1;
property Usb2 read ReadXmlAttrUsb2 write WriteXmlAttrUsb2;
property Usb3 read ReadXmlAttrUsb3 write WriteXmlAttrUsb3;
property csb0 read ReadXmlAttrcsb0 write WriteXmlAttrcsb0;
property csb1 read ReadXmlAttrcsb1 write WriteXmlAttrcsb1;
function ReadXmlAttrUsb0();
function WriteXmlAttrUsb0(_value);
function ReadXmlAttrUsb1();
function WriteXmlAttrUsb1(_value);
function ReadXmlAttrUsb2();
function WriteXmlAttrUsb2(_value);
function ReadXmlAttrUsb3();
function WriteXmlAttrUsb3(_value);
function ReadXmlAttrcsb0();
function WriteXmlAttrcsb0(_value);
function ReadXmlAttrcsb1();
function WriteXmlAttrcsb1(_value);
public
// Attributes
XmlAttrUsb0: OpenXmlAttribute;
XmlAttrUsb1: OpenXmlAttribute;
XmlAttrUsb2: OpenXmlAttribute;
XmlAttrUsb3: OpenXmlAttribute;
XmlAttrcsb0: OpenXmlAttribute;
XmlAttrcsb1: OpenXmlAttribute;
// Children
end;
function Sig.Create();overload;
begin
{self.}Create(nil, "w", "sig");
end;
function Sig.Create(_node: XmlNode);overload;
begin
class(OpenXmlElement).Create(_node: XmlNode);
end;
function Sig.Create(_parent: tslobj; _prefix: string; _local_name: string);overload;
begin
class(OpenXmlElement).Create(_parent, _prefix, _local_name);
end;
function Sig.Init();override;
begin
{self.}XmlAttrUsb0 := new OpenXmlAttribute({self.}Prefix, "usb0", nil);
{self.}XmlAttrUsb1 := new OpenXmlAttribute({self.}Prefix, "usb1", nil);
{self.}XmlAttrUsb2 := new OpenXmlAttribute({self.}Prefix, "usb2", nil);
{self.}XmlAttrUsb3 := new OpenXmlAttribute({self.}Prefix, "usb3", nil);
{self.}XmlAttrcsb0 := new OpenXmlAttribute({self.}Prefix, "csb0", nil);
{self.}XmlAttrcsb1 := new OpenXmlAttribute({self.}Prefix, "csb1", nil);
end;
function Sig.InitAttributes();override;
begin
attributes_ := array(
{self.}XmlAttrUsb0,
{self.}XmlAttrUsb1,
{self.}XmlAttrUsb2,
{self.}XmlAttrUsb3,
{self.}XmlAttrcsb0,
{self.}XmlAttrcsb1,
);
end;
function Sig.InitChildren();override;
begin
child_elements_ := array(
);
sorted_child_ := array(
"": -1,
);
end;
function Sig.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 Sig.Copy(_obj: Sig);override;
begin
if not ifnil(_obj.XmlAttrUsb0.Value) then
{self.}XmlAttrUsb0.Value := _obj.XmlAttrUsb0.Value;
if not ifnil(_obj.XmlAttrUsb1.Value) then
{self.}XmlAttrUsb1.Value := _obj.XmlAttrUsb1.Value;
if not ifnil(_obj.XmlAttrUsb2.Value) then
{self.}XmlAttrUsb2.Value := _obj.XmlAttrUsb2.Value;
if not ifnil(_obj.XmlAttrUsb3.Value) then
{self.}XmlAttrUsb3.Value := _obj.XmlAttrUsb3.Value;
if not ifnil(_obj.XmlAttrcsb0.Value) then
{self.}XmlAttrcsb0.Value := _obj.XmlAttrcsb0.Value;
if not ifnil(_obj.XmlAttrcsb1.Value) then
{self.}XmlAttrcsb1.Value := _obj.XmlAttrcsb1.Value;
end;
function Sig.ReadXmlAttrUsb0();
begin
return {self.}XmlAttrUsb0.Value;
end;
function Sig.WriteXmlAttrUsb0(_value);
begin
{self.}XmlAttrUsb0.Value := _value;
end;
function Sig.ReadXmlAttrUsb1();
begin
return {self.}XmlAttrUsb1.Value;
end;
function Sig.WriteXmlAttrUsb1(_value);
begin
{self.}XmlAttrUsb1.Value := _value;
end;
function Sig.ReadXmlAttrUsb2();
begin
return {self.}XmlAttrUsb2.Value;
end;
function Sig.WriteXmlAttrUsb2(_value);
begin
{self.}XmlAttrUsb2.Value := _value;
end;
function Sig.ReadXmlAttrUsb3();
begin
return {self.}XmlAttrUsb3.Value;
end;
function Sig.WriteXmlAttrUsb3(_value);
begin
{self.}XmlAttrUsb3.Value := _value;
end;
function Sig.ReadXmlAttrcsb0();
begin
return {self.}XmlAttrcsb0.Value;
end;
function Sig.WriteXmlAttrcsb0(_value);
begin
{self.}XmlAttrcsb0.Value := _value;
end;
function Sig.ReadXmlAttrcsb1();
begin
return {self.}XmlAttrcsb1.Value;
end;
function Sig.WriteXmlAttrcsb1(_value);
begin
{self.}XmlAttrcsb1.Value := _value;
end;