Regler le volume sonore avec delphi

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 814 fois - Téléchargée 33 fois

Contenu du snippet

reglage du volume dans delphi c'est possible...... avec une 'trackbar'
j'ai (pour le moment) trouvé trois réglages possible...
- AuxSetVolume --> Auxiliaire (line)
- MidiOutSetVolume --> Midi
- WaveOutSetVolume --> et le wave
mais les recherches continuent.....

Source / Exemple :


uses Mmsystem;

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.TrackBar1.Min :=0;
Form1.TrackBar1.Max :=65535;
Form1.TrackBar1.Frequency :=6553;
end;

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
AuxSetVolume(Form1.MediaPlayer1.DeviceID, Form1.TrackBar1.Position);
end;

A voir également

Ajouter un commentaire

Commentaires

Messages postés
13
Date d'inscription
mardi 16 mars 2004
Statut
Membre
Dernière intervention
20 avril 2011

Bonjour,
Comment rérer le volume du microphone avec vista ou "7"
merci
Messages postés
11
Date d'inscription
samedi 4 avril 2009
Statut
Membre
Dernière intervention
15 avril 2009

bonjour,

personne n'a expliquer comment faire si on utilise le format Wma

quelqu'un saurait?
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
8
Bonjour,
Scooby Doo as-tu pensé à ajouter l'unité MMSystem dans ta clause "Uses"?

Cordialement, Bacterius !

PS : si une fonction ou une procédure n'est pas reconnue, tente de la sélectionner (mettre en surbrillance) et appuie sur "F1". Si une rubrique apparait, il y a de fortes chances pour que la fonction soit reconnue, mais qu'il manque juste une unité ou quelque chose du genre ... ;)
Messages postés
7
Date d'inscription
dimanche 22 octobre 2006
Statut
Membre
Dernière intervention
18 décembre 2012

bonjour,

est-ce que vous pouvez m'aider car moi, "AuxSetVolume" n'est pas reconnu
pouvez vous m'expliquer?

merci
Messages postés
1418
Date d'inscription
samedi 12 juin 2004
Statut
Membre
Dernière intervention
5 juillet 2010
10
Windows définit des constantes spéciales pour toutes les touches du clavier. Voici les noms symboliques, les codes hexadécimaux, et les valeurs décimales des touches que tu demandes. Remplace juste le 173 de mon commentaire par ce que tu veux parmi les valeurs ci-dessous pour satisfaire tes désirs !

VK_VOLUME_MUTE / 0xAD / 173
VK_VOLUME_DOWN / 0xAE / 174
VK_VOLUME_UP / 0xAF / 175

@+
Nico
Afficher les 18 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.