ButtonClick Prozedur in eigene Methode definieren

[Sherlock]

Du kannst die gleiche Ereignisbehandlungsmethode mehreren OnClicks zuweisen. Das geht entweder über den Objektinspektor oder eben im Code zur Laufzeit:

Delphi-Quellcode:

...
Button1.OnClick := MultiClicker;
Button2.OnClick := MultiClicker;
...

Wichtig ist dabei eigentlich nur, daß im obigen Beispiel MultiClicker die korrekte Signatur hat also eine procedure ist und als Parameter Sender:TObject hat. Innen drin sollte sie natürlich unterschiedlich auf die verschiedenen Buttons reagieren, aber dafür ist ja der Sender da.

Sherlock