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