Listview sortieren: Makevisible(False)

[Lannes]

Hallo,

SubItems[1] ist schon richtig

Code:

Spalte 1 | Spalte 2    | Spalte 3    |
Caption  | SubItems[0] | SubItems[1] |

1. mit Zuweisung der Items

Delphi-Quellcode:

var z : Integer;
    aItem : TListItem;
begin
  for z := ListView1.Items.Count-1 downto 0 do
    begin
    aItem := ListView1.Items[z];
    if aItem.SubItems[1] <> 'Delphi' then
      aItem.Delete;
    end;

2. ohne Zuweisung

Delphi-Quellcode:

var z : Integer;
begin
  for z := ListView1.Items.Count-1 downto 0 do
    if ListView1.Items[z].SubItems[1] <> 'Delphi' then
      ListView1.Items[z].Delete;