Checkboxes w TListView

Hej!

Mam TListView i włączoną właściwość Checkboxes. A moje pytanie brzmi jak zrobić aby po wciśnięciu Buttona każdy zaznaczony Item był dodany jako nowa linia do richedit?

Może pętla po itemach i sprawdzanie, czy jest zaznaczony, jeśli tak to dodajemy?

var
 Idx: Integer;
begin
  for Idx := 0 to ListView.Items.Count -1 do
       if ListView.Items[Idx].Checked then
           RichEdit.Lines.Add(ListView.Items[Idx].Caption);