Du könntest doch folgendermaßen abfragen:
Delphi-Quellcode:
if (Sender = xy) or (Sender.InheritsFrom(TLabel) and (TLabel(Sender).Parent = xy)) then
begin
...
end;
Statt TLabel kannst Du auch das übergeordnete TControl verwenden. Dann gilt es auch für andere Elemente wie z.B. TEdit.
Gruß Daddy