OfficeXml/autoclass/docx/Sig@DOCX.tsf

185 lines
5.1 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 Copy(_obj: Sig);override;
public
// attributes property
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;
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
setsysparam(pn_calcctrlword(), getsysparam(pn_calcctrlword()) .| 0x200);
class(OpenXmlElement).Create(_parent, _prefix, _local_name);
end;
function Sig.Init();override;
begin
pre := {self.}Prefix ? {self.}Prefix + ":" : "";
attributes_ := array();
attributes_pf_ := array(
pre + "usb0": makeweakref(thisFunction(WriteXmlAttrUsb0)),
pre + "usb1": makeweakref(thisFunction(WriteXmlAttrUsb1)),
pre + "usb2": makeweakref(thisFunction(WriteXmlAttrUsb2)),
pre + "usb3": makeweakref(thisFunction(WriteXmlAttrUsb3)),
pre + "csb0": makeweakref(thisFunction(WriteXmlAttrcsb0)),
pre + "csb1": makeweakref(thisFunction(WriteXmlAttrcsb1)),
);
sorted_child_ := array(
);
container_ := new TSOfficeContainer(sorted_child_);
end;
function Sig.Copy(_obj: Sig);override;
begin
tslassigning_backup := tslassigning;
tslassigning := 1;
class(OpenXmlElement).Copy(_obj);
if not ifnil(_obj.Usb0) then
{self.}Usb0 := _obj.Usb0;
if not ifnil(_obj.Usb1) then
{self.}Usb1 := _obj.Usb1;
if not ifnil(_obj.Usb2) then
{self.}Usb2 := _obj.Usb2;
if not ifnil(_obj.Usb3) then
{self.}Usb3 := _obj.Usb3;
if not ifnil(_obj.csb0) then
{self.}csb0 := _obj.csb0;
if not ifnil(_obj.csb1) then
{self.}csb1 := _obj.csb1;
tslassigning := tslassigning_backup;
end;
function Sig.ReadXmlAttrUsb0();
begin
return {self.}XmlAttrUsb0.Value;
end;
function Sig.WriteXmlAttrUsb0(_value);
begin
if ifnil({self.}XmlAttrUsb0) then
begin
{self.}XmlAttrUsb0 := new OpenXmlAttribute({self.}Prefix, "usb0", nil);
attributes_[length(attributes_)] := {self.}XmlAttrUsb0;
end
{self.}XmlAttrUsb0.Value := _value;
end;
function Sig.ReadXmlAttrUsb1();
begin
return {self.}XmlAttrUsb1.Value;
end;
function Sig.WriteXmlAttrUsb1(_value);
begin
if ifnil({self.}XmlAttrUsb1) then
begin
{self.}XmlAttrUsb1 := new OpenXmlAttribute({self.}Prefix, "usb1", nil);
attributes_[length(attributes_)] := {self.}XmlAttrUsb1;
end
{self.}XmlAttrUsb1.Value := _value;
end;
function Sig.ReadXmlAttrUsb2();
begin
return {self.}XmlAttrUsb2.Value;
end;
function Sig.WriteXmlAttrUsb2(_value);
begin
if ifnil({self.}XmlAttrUsb2) then
begin
{self.}XmlAttrUsb2 := new OpenXmlAttribute({self.}Prefix, "usb2", nil);
attributes_[length(attributes_)] := {self.}XmlAttrUsb2;
end
{self.}XmlAttrUsb2.Value := _value;
end;
function Sig.ReadXmlAttrUsb3();
begin
return {self.}XmlAttrUsb3.Value;
end;
function Sig.WriteXmlAttrUsb3(_value);
begin
if ifnil({self.}XmlAttrUsb3) then
begin
{self.}XmlAttrUsb3 := new OpenXmlAttribute({self.}Prefix, "usb3", nil);
attributes_[length(attributes_)] := {self.}XmlAttrUsb3;
end
{self.}XmlAttrUsb3.Value := _value;
end;
function Sig.ReadXmlAttrcsb0();
begin
return {self.}XmlAttrcsb0.Value;
end;
function Sig.WriteXmlAttrcsb0(_value);
begin
if ifnil({self.}XmlAttrcsb0) then
begin
{self.}XmlAttrcsb0 := new OpenXmlAttribute({self.}Prefix, "csb0", nil);
attributes_[length(attributes_)] := {self.}XmlAttrcsb0;
end
{self.}XmlAttrcsb0.Value := _value;
end;
function Sig.ReadXmlAttrcsb1();
begin
return {self.}XmlAttrcsb1.Value;
end;
function Sig.WriteXmlAttrcsb1(_value);
begin
if ifnil({self.}XmlAttrcsb1) then
begin
{self.}XmlAttrcsb1 := new OpenXmlAttribute({self.}Prefix, "csb1", nil);
attributes_[length(attributes_)] := {self.}XmlAttrcsb1;
end
{self.}XmlAttrcsb1.Value := _value;
end;