Problem mit OnMouseEnter und OnMouseLeave-Prozeduren

[Jens Schumann]

Hallo,
jedem Label dasselbe OnMouseEnter u. OnMouseLeave Ereignis zuweisen
und dann folgenden Code verwenden.

Delphi-Quellcode:

procedure TFormEtalon.MouseEnter(Sender: TObject);
begin
Tlabel(Sender).Font.Color:=clblack;
end;