Ich meine nicht den Rückgabewert der Funktion, die Werte sind mir bekannt !
ich möchte anhand der aktuelle Lautstärke die Position meiner TrackBar setzen.
Jetziger Code :
Delphi-Quellcode:
function TTWKom.getVolume: Longint;
var
v : pdword;
res : mmresult;
begin
Result := fVolume;
if active then begin
res := waveOutGetVolume(acmOut.FWaveOutHandle, @v);
if Integer(res) <> 0 then
result := 0
else
result := Integer(v);
end;
end;
Leider funktioniert das nicht richtig;
Ich denke mal das der Wert in V auch irgentwie umgerechnet werden muß mit shl, aber wie ?
Gruß Data
[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]