Delphi Funktion einem OnClick allen Komponenten eines Typs zuweisen

Thema durchsuchen

Ansicht

Themen-Optionen

Funktion einem OnClick allen Komponenten eines Typs zuweisen

Ein Thema von zecke · begonnen am 18. Sep 2007 · letzter Beitrag vom 18. Sep 2007

Vorheriger Beitrag

Nächster Beitrag

Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge

Delphi 2010 Professional

Re: Funktion einem OnClick allen Komponenten eines Typs zuwe

18. Sep 2007, 18:44

Hallo zecke,

du brauchst nur die leeren Klammern zu entfernen:

(FindComponent('UpDown' + IntToStr(i)) as TUpDown).OnClick := UpDownSwitch; Ich habe das überflüssige Form1 gleich mit entfernt. Das schafft nur Probleme, falls du mehrere Instanzen einer Formularklasse hast.

Was spricht eigentlich dagegen, alle UpDown-Controls im Designer zu markieren und ihnen dann eine gemeinsame Behandlungsroutine zuzuweisen?

Gruß Hawkeye