Label unter Mausposition

[Mr_G]

Ich möchte mich da anschließen:

Delphi-Quellcode:

procedure TForm1.OnLabelMouseMove(); 
begin 
  if Sender is TLabel then 
  begin
    (Sender as TLabel).Color := clGreen;
  end; 
end;

Diese Methode könnte man dann den entsprechenden Labels zuweisen.

@ Hagen: Deine Lösung ist zwar recht simpel aber ein Problem hast du denke ich nicht bedacht: Was ist mit den Labels die diesen Effekt nicht erhalten sollen da sie z.B. nur als Beschriftung dienen sollen? Denn die bekommen den Effekt auch verpasst ...