Hallo onkelrossie,
Ich frage mich, wieso du ein break nutzt? Damit fliegst du komplett aus der for-schleife raus. Du willst aber doch weiterhin vergleichen. Warum machst du es nicht so:
Delphi-Quellcode:
1
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
sl: TStringList;
begin
sl:= TStringList.Create;
for i := 0 to ListView1.Items.Count - 1 do begin
if not (ListView1.Items[i].SubItems[2] = ListView1.Items[i+1].SubItems[2]) then
sl.Add(IntToStr(i+1));
end;
end;