WaveMapper L/R

[Christian Seehase]

Moin DJ-SPM,

dann will ich mal versuchen, das zu erklären:

Der zweite Parameter von WaveOutSetVolume setzt sich eigentlich aus zwei Parametern zusammen, nämlich einem Wert für die Lautstärke des linken und einem für die Lautstärke des rechten Kanals.

Der Parameter ist ein DWORD, also ein 32 Bit Wert ohne Vorzeichen.
Dies kann man aber auch ansehen, als zwei unmittelbar aufeinander folgende Werte vom Typ WORD (16 Bit ohne Vorzeichen)
Das höherwertige WORD steht hierbei für die Lautstärke des rechten Kanals, das niederwertige für die des linken.

Der Wertebereich für ein WORD geht von 0 bis 65535 (Du hattest also nicht ganz Vollausschlag ) Hexadezimal wäre das FFFF.

In Deinem Beispiel, 65000, hätte nun also das niederwertige WORD den Wert 65000 (passt ja rein) und das höherwertige den Wert 0.
Folge: Auf dem rechten Kanal kommt nichts, auf dem linken hast Du fast volle Lautstärke.
Um jetzt den Wert für den rechten zu setzen, muss dieser in das höherwertige Word. Dieses befindet sich, sozusagen, 16 links des niederwertigen WORDs.
Um bei Deinem Beispiel zu bleiben: 65000 dez ist FDE8 Hex.
Damit beide Kanäle also diesen Wert bekommen, müsste als Parameter
FDE8FDE8 übergeben werden.

Dazu kannst Du dann einfach einer Variablen vom Typ DWORD den gewünschten Wert geben, und musst dann beim Aufruf der Funktion nur noch dafür sorgen, dass dieser Wert auch im höherwertigen WORD steht.
Dies geht am einfachsten mit shl (Shift Left)

Beispiel:

Delphi-Quellcode:

var
  dwVolume : DWORD;

begin
  dwVolume := $FDE8; // Die 65000 aus Deinem Beispiel
  // durch shl 16 wird der Wert in das höherwertige WORD verschoben
  // dwVolume shl 16 wäre also gleich $FDE80000
  // dwVolume selber ist $0000FDE8
  WaveOutSetVolume(wave_mapper,(dwVolume shl 16) or dwVolume); 
end;

War das jetzt verständlicher?