Typecast Error by Sender As TWhatever

[sirius]

Name ist doch von TComponent abgeleitet.
Also:

Delphi-Quellcode:

var tmp:string;
begin
  tmp:=(Sender as TComponent).Name;
  if ((sender is TBitBtn) and (tmp='xyz1'))or
     ((sender is TBitBtn) and (tmp='xyz2'))or
     ...
  then