Código Delphi [-]Label1.Caption := InttoStr((pbn1.Position * 100) / pb1n.Max);
Label1.Caption := InttoStr((pbn1.Position * 100) / pb1n.Max);