Cambiar Color de Tlabel con el Mouse
 

Hola

Me interesaria cambiar el color de un label al generar el OnMouseMove sobre ella. Estoy Trabajando con Delphi 3.
Gracias.

No sé si es algo como esto lo que pides:

Código Delphi [-]
 procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X,
   Y: Integer);
 begin
 label1.Font.Color:=ClRed;
 end;

Un Saludo.

Lo que te respondió Marcos es lo que preguntas.

Pero también te puede interesar, realizar un efecto al estilo pagina web, de remarcar un label al pasar el mouse sobre él y al salir vuelva al color normal

Código Delphi [-]
procedure TFormAcercaDe.LabelMailMouseEnter(Sender: TObject);
begin
  with Sender as TLabel do
  begin
   Cursor := crHandPoint;
   Font.Style := [fsUnderline, fsBold];
   Font.Color := clBlue;
  end;
end;

procedure TFormAcercaDe.LabelMailMouseLeave(Sender: TObject);
begin
  with Sender as TLabel do
  begin
    Cursor := crDefault;
    Font.Style := [fsBold];
    Font.Color := clSilver;
  end;
end;

Perdon por la demora
Crandel, seguramente tu codigo funciona, pero estoy trabajando con la version 3 y tambien la 5 y no tengo los eventos que mencionas. Igualmente gracias