有一个函数，需要在2个地方调用，用什么方法让函数自己知道是哪个地方在调用呢？

Question

比如2个 lable 的 click 事件都调用一个改字体的函数，怎么让函数区分是哪个地方调用的呢？需要实现的目标是 lable1 调用，则改 lable1 的字体，lable2 调用则改 lable2 的字体，互不干扰

Answer 1

在函数里加一个：Tlabel的参数就是

Answer 2

在函数里加一个：Tlabel的参数就是

Answer 3

但是怎么设置字体呢？
例如：
xxx.font.style:=[];
参数 xxx 具体怎么传递。请写出调用是函数的代码。我是菜鸟

Answer 4

procedure TForm1.Label1Click(Sender: TObject);
begin
  SetFont(TLabel(Sender));
end;procedure TForm1.SetFont(ALabel: TLabel);
begin
  ALabel.Font.Style := ...;
end;