mehrere Button-Captions in Memo verschieben

[Hansa]

ich habe das jetzt etwas umgebaut und es funktioniert auch wie gewünscht. Aber eine letzte Frage noch:

wozu die die for-Schleife ?

Delphi-Quellcode:

procedure TForm1.PanelClick(Sender: TObject);
var i : integer;
    TempCaption : string;
begin
  If Sender Is TLabel Then
    TempCaption := TLabel(Sender).Caption;
  If Sender Is TPanel Then
    With Sender As TPanel Do
      for i := 0 to pred(ControlCount) do
        If Controls[i] is TLabel then
          TempCaption := TLabel(Controls[i]).Caption;
  Memo1.Lines.Add (TempCaption);
end;

Statt des i bräuchte ich eigentlich nur den aktuellen Wert der Caption des Labels, das auf dem Panel liegt. Bzw., was macht das ControlCount genau ?