Wave Lautstärke in Prozent angeben

[freak4fun]

Nächste Versuch...

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  Label1.Caption := FloatToStrF(((TrackBar1.Position / 65535) * 100), ffFixed, 3, 0) + '%';
end;

[edit]MAXWert der Trackbar ist 65535[/edit]