Hallo
mit dem Code kann ich zwar den Ton hoch und leiser machen, aber
wenn ich die Lautstärke danach anschaue, dann finde ich die alte Position
immer die selbe, egal ob ich den Scrollbar Maximum oder Minimum mache !
Ich möchte gerne, dass die Lautstärke hier auch geändert werden
http://www.mediaculture-online.de/up...autstaerke.gif
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
LeftVolume:Word;
RightVolume:Word;
begin
LeftVolume:=ScrollBar1.Position;// max is 65535
RightVolume:=ScrollBar1.Position;//
SetWaveVolume( MakeLong( ScrollBar1.Position,ScrollBar1.Position));
end;