42 |
|
|
43 |
Koreliste : string; |
Koreliste : string; |
44 |
|
|
45 |
Shop2Direkte : string; |
// Shop2Direkte : string; |
46 |
|
|
47 |
SimpelLinie1, SimpelLinie2, SimpelLinie3: String; |
SimpelLinie1, SimpelLinie2, SimpelLinie3: String; |
48 |
|
|
63 |
constructor TLabelData.Create(xmlDoc: TXMLDocument); |
constructor TLabelData.Create(xmlDoc: TXMLDocument); |
64 |
var |
var |
65 |
PakkeKontrolNode: Xml.XMLIntf.IXMLNode; |
PakkeKontrolNode: Xml.XMLIntf.IXMLNode; |
|
TmpNode: Xml.XMLIntf.IXMLNode; |
|
66 |
begin |
begin |
67 |
|
|
68 |
PakkeKontrolNode := xmlDoc.ChildNodes.FindNode('PakkeKontrol'); // Cache opslaget der finder PakkeKontrol noden |
PakkeKontrolNode := xmlDoc.ChildNodes.FindNode('PakkeKontrol'); // Cache opslaget der finder PakkeKontrol noden |
94 |
|
|
95 |
Koreliste := PakkeKontrolNode.ChildNodes.FindNode('Koreliste').Text; |
Koreliste := PakkeKontrolNode.ChildNodes.FindNode('Koreliste').Text; |
96 |
|
|
97 |
Shop2Direkte := GetOptionalValue(PakkeKontrolNode, 'Shop2Direkte', ''); |
|
98 |
|
|
99 |
|
|
100 |
ZPL := GetOptionalValue(PakkeKontrolNode, 'ZPL', ''); |
ZPL := GetOptionalValue(PakkeKontrolNode, 'ZPL', ''); |