Thema: Delphi doppeltes Tag

Einzelnen Beitrag anzeigen

Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#4

Re: doppeltes Tag

  Alt 4. Jul 2007, 16:36
Hi,

ich hab eben mal ein Projekt von mir abgewandelt.
Ich hoffe, es hilft (ungetestet!)

Delphi-Quellcode:
var
  products: ixmlnodelist;
  product: ixmlnode;
begin
  products := xmldoc.ChildNodes.FindNode('products').ChildNodes;
  for i := 0 to products.Count-1 do
  begin
    product := products.Get(i);
    if lowercase(product.NodeName) = 'productthen //<-- Das if kannst du weglassen, wenn es eh nur <product>-Tags gibt
    begin
      with product do
      begin
      ...
      end;
    end;
  end;
end;
Edit: Variablennamen geändert...
  Mit Zitat antworten Zitat