Listbox, selected items abfragen , FMX Variante

[bernhard_LA]

dieses kurze Code Beipiel soll alle selected Items aus einer FMX Listbox auflisten, funktioniert aber nicht
Wo liegt denn der Fehler ?

Delphi-Quellcode:

  

  for i := 0 to ListBox_Filenames.Items.Count - 1 do
  begin
    if (ListBox_Filenames.ListItems[i].IsSelected) then
    begin

      Label_statbar.text := ListBox_Filenames.ListItems[i].text;


      ......