Delphi-Quellcode:
if (Sender is TButton) then
showmessage((Sender as TButton).Name);
ist vollkommen unnötig, denn wenn IS meinte es wäre OK, dann ist AS an dieser Stelle unnüzt, da es eh nie anschlagen kann.
Delphi-Quellcode:
if (Sender is TButton) then
showmessage(TButton(Sender).Name);
Dieses reicht also aus und ist sogar kürzer und, für mich zumindestens, "übersichtlicher".
PS: statt des Castes vor Ort nutze ich hier manchmal sogar "externe" Casts, in Form einer ABSOLUTE-Deklaration.