ListView, Column Count?

[mav]

hello all :)

Ich habe eine frage..

wie kann ich aus einer ListView spezifisch eine Column Counted, welche den Eintrag -1 haben :)

hoffe jemand versteht das :D

[toms]

sorry, ich verstah di nöd....

[mav]

also.. ;)

ich habe eine xml -> listview (column 1-7)

nun möchte ich genau aus column[7] alle gezählt haben, welche den eintrag '-1' haben

wie mach ich das?

[toms]

etwa so:

Delphi-Quellcode:

for iLoop := 0 to Pred(ListView1.Items.Count) do 
 if Listview1.Items[iLoop].SubItems[6] = '-1' then
 begin
  // ...
 end;
end;

[mav]

dass habe ich au schon :)
nun möchte ich aber das ganze in solch einer form

StatusBar1.Panels[0].Text := 'Need: '+IntToStr(MainForm.AppsList.Items.xxxxxx);

[mav]

dieses problem bringt mich früher oder später um die ecke.. ich komme einfach nicht vom fleck ;(

[Luckie]

Dann pack doch toms Code in eine Funktion, die dir dann die Eintrage mit -1 zurückgibt.

[mav]

sorry.. aber ich verstehe es nicht..

[Luckie]

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    { Private declarations }
    function Foo: Integer;
  public
    { Public declarations }
  end;

Delphi-Quellcode:

function TForm1.Foo: Integer;
var
  i: Integer;
  cnt: Integer;
begin
  cnt := 0;
  for iLoop := 0 to Pred(ListView1.Items.Count) do 
    if Listview1.Items[iLoop].SubItems[6] = '-1' then 
    begin 
      Inc(cnt);
    end; 
  end;
  result := cnt;
end;

Delphi-Quellcode:

StatusBar1.Panels[0].Text := 'Need: '+IntToStr(Foo);