Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Soundlautstärke regeln (https://www.delphipraxis.net/86487-soundlautstaerke-regeln.html)

Crazymodder 14. Feb 2007 20:25


Soundlautstärke regeln
 
Hi Ich wollt folgendes Programm programmieren!
Ich möchte bei einem button klick das
Wave Lautstärke auf 10% geht und die mircolautstärke auf 50% geht.
Und bei nem zweiten button soll Wave Lautstärke wieder auf 100% und Mircophone auf 0%.
Also wäre sehr nett wenn mir jmd mir das erklären könnte.
Also das bei dsdt.info damit komm ich net ganz zu rande also freu mich auf eure hilfe
Danke im Vorraus
Crazymodder

SirThornberry 14. Feb 2007 20:30

Re: Soundlautstärke regeln
 
woran genau scheiterst du bei der erwähnten Variante? Die Wahrscheinlichkeit das du hier eine andere Variante erfährst ist sehr gering da es über die API-Funktionen von Windows gemacht wird und das sind nunmal immer die gleichen.

Crazymodder 14. Feb 2007 20:46

Re: Soundlautstärke regeln
 
Naja genau will ich wissen wie man die lautstärke da setzen kann!

SirThornberry 14. Feb 2007 20:50

Re: Soundlautstärke regeln
 
kannst du einen Link zu der Quelle posten damit wir wissen wovon du genau redest?

bitsetter 14. Feb 2007 23:07

Re: Soundlautstärke regeln
 
Meinst du diesen Link hier?
Lautstärke ermitteln
In Bezug auf den Link, stellt folgendes Beispiel die WAV Lautstärke auf 100%.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  SetVolume(65500, 65500);
end;

Crazymodder 15. Feb 2007 03:20

Re: Soundlautstärke regeln
 
MH ah danke also wäre 50% wenn ich den WErt halbiere?
P.S. Die Quelle ist richtig.
MH würde mich freuen wenn mir noch einer sagen würde wie das dann noch mit dem Microgeht danke!

bitsetter 15. Feb 2007 08:39

Re: Soundlautstärke regeln
 
Zitat:

Zitat von Crazymodder
MH ah danke also wäre 50% wenn ich den WErt halbiere?

So ist es, 50% sind also 32750.

Es gibt noch eine Komponente mit Code, mit der kann man unter anderem die Micro Lautstärke setzen:
TAudioMixer


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz