so.. nach langem hin und her hab ich jetzt mal dieses hier versucht..
Delphi-Quellcode:
begin
ListView1.Items.BeginUpdate;
ListView1.Clear;
nl:= xmldoc.documentElement.selectNodes('mov');
for i := 0 to nl.length - 1 do begin
subNode := nl.item[i].selectSingleNode('id');
ListView1.Items.Add;
ListView1.Items[i].Caption := subNode.text;
with ListView1.Items[i].SubItems do begin
subNode := nl.item[i].selectSingleNode('name');
if lowercase(subNode.text) = lowercase(LabeledEdit1.Text) then
Add(subNode.text);
end;
end;
ListView1.Items.EndUpdate;
end;
jedoch überschreited jetzt der listenindex max.(5) und ich finde den fehler nicht