string - 从 TStringList 中删除字符串

Question

我有一个包含项目的列表框或 ListView 。我有一个字符串列表，其中包含与列表框/ ListView 相同的项目(字符串)。我想从字符串列表中删除列表框/ ListView 中的所有选定项目。

怎么办？

for i:=0 to ListBox.Count-1 do
  if ListBox.Selected[i] then
    StringList1.Delete(i); // I cannot know exactly an index, other strings move up

Answer 1

for i := ListBox.Count - 1 downto 0 do
  if ListBox.Selected[i] then
    StringList1.Delete(i);