Új hozzászólás Aktív témák

• #491 Alan aktív tag corm #488

  Új Válasz 2005-01-15 19:16:00 #491

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Alan

  aktív tag

  válasz corm #488 üzenetére

  Hát... ehhez én első lépésben a TXMLDocument komponenst ajánlom (Internet fül a komponenspalettán). Nem vészesen bonyolult a használata, itt egy kis példa neked kiollózva egy régebbi programomból:
  
  procedure AddNodesToTree(From: IXMLNode);
  var i: integer;
  CurrentXMLNode: IXMLNode;
  begin
  for i := 0 to From.ChildNodes.Count-1 do
  if From.ChildNodes[ i ].NodeName = 'keresettcimke'
  then begin
  CurrentXMLNode := From.ChildNodes[ i ];
  // adatfeldolgozás a CurrentXMLNode alapján
  // pl. valami := CurrentXMLNode.Attributes[ 'egyikattributum' ] ;
  // valami2 := CurrentXMLNode.Attributes[ 'masikattributum' ] ;
  end;
  if CurrentXMLNode.HasChildNodes then AddNodesToTree(CurrentXMLNode);
  end;
  
  ...és ezt a rutint így hívnám meg:
  AddNodesToTree(XMLDocument1.DocumentElement, nil);
  
  Remélem, olvasható marad a kód...
  
  [Szerkesztve]

Új hozzászólás Aktív témák