usar "Sender" con Labels

[elcigarra]

Alguien sabe porqué no funciona o cómo hacer funcionar el siguiente código?

Código Delphi [-]
Procedure TForm1.Label1MouseMove(Sender:TObject);
begin
  if (Sender = Label1) then showmessage('Fue sobre Label1');
  if (Sender = Label2) then showmessage('Fue sobre Label2');
end;

Es decir: Entrar al procedimiento entra cuando muevo sobre uno de los dos labels, pero parece que luego de entrar al procedimiento la Variable "Sender" se olvida de us valor y no entra en ninguno de los "IF". ¿Alguien sabe porqué?