Zeilen in verschiedenen Labels anzeigen

[Sharky]

Zitat von citybreaker:

Wenn ich wieder TListView nehme...

Wo ist der Unterschied ob Du die Daten in eine TListBox schreibst oder in ein TListView?

Delphi-Quellcode:

procedure UpdateList;
const
  Liste:  Array[0..7] Of String = ('id', 'main', 'name', 'vorname', 'straße', 'hausnummer', 'postleitzahl', 'ort');
var
  rdfs: IXmlDomNodeList;
  id1: IXMLDomNode;
  main1: IXmlDomNode;
  I: integer;
  LI: TListItem;
begin
  MainFrm.ListView1.Items.BeginUpdate;
  MainFrm.Listview1.Items.Clear;
  rdfs := XmlDoc.documentelement.selectNodes('adblock');
  for i := 0 to rdfs.length -1 do begin
    id1 := rdfs.item[i].selectsingleNode(liste[0]);
    main1 := rdfs.item[i].selectsingleNode(liste[1]);
    LI := Listview1.Items.Add;
    LI.ImageIndex := 0;
    LI.Caption := id1.Text;
    LI.SubItems.Add(main1.text);
  end;
  MainFrm.ListView1.Items.EndUpdate;
end;

Und die ID könntest Du sehr schön der Eigenschaft .Data des ListItems zuweisen.