Typecast Error by Sender As TWhatever

[mirage228]

Zitat von sirius:

Zitat von mirage228:

Wobei man, wenn er sich nur für den Namen interessiert, die Abfrage ob das Objekt ein TBitBtn ist auch weglassen kann.

Er überprüft ja auf unterschiedliche Namen (je nach Klasse)

Ja gut, aber wenn er die Methode wirklich nur von zwei Komponenten aus abrufbar machen will kann er gleich gegen die Komponenten-Variable testen.
if (Sender = miPrint) or (Sender = btnWhatEver) then ...