[icsander]

Лучше так

Код:

begin
if Sender is TLabel then lbClick := sender as TLabel else exit;
if Assigned(lbClick)
then begin
....
end;
end;