Buttons ansprechen in einer Schleife

[Jens Schumann]

Hallo,
eigentlich darf es mit Application.Components gar nicht funktionieren. Da hier nur die Formulare
einer Anwendung enthalten sind.
Wenn man auf Komponenten auf einem Formular zugreifen möchten muss es eigentlich so gehen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  iCnt : Integer;
begin
  ListBox1.Clear;
  For iCnt:=ComponentCount - 1 downto 0 do
    ListBox1.Items.Add(Components[iCnt].Name);
end;