Código Delphi [-]Label1.Caption := InToStr(valores[TRackBar.Position]);
Label1.Caption := InToStr(valores[TRackBar.Position]);