Um Anzahl der Einträge zu zählen wo ListView1.Items.Count aufrufen?

[OrNEC]

Hallo,

ich hab folgende Procedure geschrieben um Einträge in einer ListView zu zählen. Ich weiß allerdings nicht so recht, und die Hilfe bringt mich auch nicht weiter, wo ich die Procedure immer aufrufen soll, um den Counter aktuell zu halten? Also in was für nem Ereignis? In "OnChange" und "OnChanging" klappt das nicht so gut, der Counter wird erst dann aktualisiert wenn man in der ListView was zusätzliches gemacht hat.


Danke!

Delphi-Quellcode:

//Anzahl der Einträge anzeigen
procedure ViewItemsCount;
begin
if Form1.ListView1.Items.Count=0 then
  Form1.StatusBar1.Panels[0].Text:=('Keine Einträge')
else if Form1.ListView1.Items.Count=1 then
  Form1.StatusBar1.Panels[0].Text:=('1 Eintrag')
else
  Form1.StatusBar1.Panels[0].Text:=IntToStr(Form1.ListView1.Items.Count)+ ' Einträge';
end;