Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Mikrofonpegel unter Vista regeln (https://www.delphipraxis.net/137733-mikrofonpegel-unter-vista-regeln.html)

PinKing2 27. Jul 2009 23:52


Mikrofonpegel unter Vista regeln
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo,

evtl. kann mir jemand auf die Sprünge helfen. Wie regle ich unter Vista / Win 7 den Pegel
vom Mikrofon, bzw. schalte ich das Mikrofon auf Mute?

Hier habe ich Code gefunden, der auch funktioniert. Allerdings wird dort Line Out
geregelt. Wie kann man das fürs Mikrofon umfunktionieren? Wäre für einen Tipp sehr dankbar.

Anbei mein Beispiel. Es ist das Projekt aus dem anderen Beitrag etwas abgewandelt. Funktioniert bei mir
unter Win 7.

Vielen Dank für jede Hilfe.

Gruss,

Andy.

PinKing2 30. Jul 2009 22:19

Re: Mikrofonpegel unter Vista regeln
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo,

ist mein Problem so trivial oder so schwierig, dass keiner einen Tipp hat?
Irgendwie scheint der Zugriff auf die Audiokomponenten unter Vista/Win7
ein riesen Geheimnis zu sein, oder?

Naja, ich habe mal weiter gebastelt, mich eingelesen und einiges Versucht,
aber der Zugriff auf die Lautstärke des Mikrofons ist mir bisher nicht gelungen.

Auf das Standard Audiogerät (unter Systemsteuerung\Hardware und Sound\Audiogeräte
verwalten einstellbar) kann ich zugreifen, aber auf das Mikrofon, welches unter
Eigenschaften\Reiter "Pegel" zu finden ist, noch nicht.

Anbei mal mein Projekt in 2 Versionen. Das erste ist lauffähig. Um mit der Materie
warm zu werden (bin Hobbyprogrammierer) habe ich mich mal an einigen Funktionen
aus der Unit MMDeviceAppi versucht und einiges klappt auch. Dann wollte ich den Namen
aller aktiven Audiogeräte ermitteln, aber da scheitere ich, da die Unit MMDeviceAppi
nicht vollständig ist. Es fehlten die Funktionen für IPropertyStore. Nach langem suchen
im www habe ich noch einiges zusammengetragen, aber jetzt fehlt mir die Deklaration TPropertyKey
und ich weiss nicht wo die zu finden ist.

Vielleicht kann ja doch noch jemand helfen.

Besten Dank!

Gruss,

Andy.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:10 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