How to get all selected items in Delphi listbox?

Question

Delphi

Hello friends, I have a question, I don’t understand how to find out all the selected lines in the Delphi fmx listbox.
If I set the ListBox MultiSelected to true and try to select a row, it only shows the last selected one.
But I still don’t understand how to use the CheckBox in the ListBox with the ShowCheckBox option enabled, maybe someone who solved the problem with the multi-selection will tell

Answer 1

procedure TForm1.ListBox1Click(Sender: TObject);

begin

If ListBox1.Selected.Selectable = true Then
            showMessage(ListBox1.Selected.Text);
end;

end.

Answer 2

[dcc32 Error] Unit4.pas(58): E2149 Class does not have a default property in Delphi FMX xe10.1 error when using

if ListBox1.Selected[0] = true then  
    showmessage('');