/[projects]/dao/DelphiScanner/LabelData.pas
ViewVC logotype

Diff of /dao/DelphiScanner/LabelData.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3106 by torben, Tue Aug 23 08:18:16 2016 UTC revision 3107 by torben, Tue Aug 23 14:08:44 2016 UTC
# Line 59  type Line 59  type
59    
60  implementation  implementation
61    
   
62  constructor TLabelData.Create(xmlDoc: TXMLDocument);  constructor TLabelData.Create(xmlDoc: TXMLDocument);
63  var  var
64    PakkeKontrolNode: Xml.XMLIntf.IXMLNode;    PakkeKontrolNode: Xml.XMLIntf.IXMLNode;
65  begin  begin
66      if xmlDoc = nil then
67      begin
68        exit;
69      end;
70    
71    PakkeKontrolNode := xmlDoc.ChildNodes.FindNode('PakkeKontrol');  // Cache opslaget der finder PakkeKontrol noden    PakkeKontrolNode := xmlDoc.ChildNodes.FindNode('PakkeKontrol');  // Cache opslaget der finder PakkeKontrol noden
72    
Legend:
Removed from v.3106  
changed lines
  Added in v.3107
  ViewVC Help
Powered by ViewVC 1.1.20