Discussion :

[altaruk]

Bonjour, j'ai crée un exe qui marche très bien sur le PC équipé de Delphi
Code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
procedure TForm1.FormShow(Sender: TObject)
var
  i: Integer;
 
begin
  for i:=0 to 9 do
    windows.Beep((1000*i)+5000,2000);
end;
 
end;

Je souhaite l'exécuter sur un PC qui n'a pas Delphi mais je n'entends pas les sons qui devraient être émis !
Help

[Gilbert Geyer]

Bonjour,

Bonjour, j'ai crée un exe qui marche très bien sur le PC équipé de Delphi
Je souhaite l'exécuter sur un PC qui n'a pas Delphi mais je n'entends pas les sons qui devraient être émis !

... si tu n'entends rien, c'est problablement que le "Volume" du son est réglè vers zéro : clicques donc sur l'icône "Haut-parleur" dans la barre de tâches de Windows et augmentes le volume.

A+

[altaruk]

C'est quand même bizarre que j'arrive à écouter Linkin Park et pas les beep ...

[exoseven]

beep n'est pas contrôlé par le volume sonore standard, sur ta machine muette il a surement du être désactivé voir http://msdn.microsoft.com/en-us/libr...77(VS.85).aspx

[altaruk]

Je sais bien.
Il existe la fonction Beep qui utilise le haut parleur du boitier, et la fonction windows.Beep(frequence,duree) qui utilise les enceintes du PC

Mais ca ne repond toujours pas à ma question qui est : "pourquoi ca marche sur un PC et pas sur un second PC qui a le son sur ON, les enceintes branchées ??"

Merci bien

[bs.box]

Je crois que la carte mère que vous utilsé [où Delphi est installé]
a une option ou le son sort au parleur de la carteSON.
par contre d'autre sort le son depuis le baf où provient
les bips du bios.. peut être.

Bon Courage..

[altaruk]

Merci je vais me renseigner et je vous dis quoi

[jamdinhe]

je n'est pas de réponse;
mais j'ai essayé le code sur mon pc, dans lequel Delphi est installé ...
et je n'est eu aucun son quand j'ai exécuté !!

Donc, fait nous signe dès que t'auras l'explication ... ça serais bien gentil

Bonne recherche

[Aka Guymelef]

D'après ce qui est dit dans l'aide la routine Beep de Delphi utilise l'API MessageBeep pour produire le son ce qui est effectivement différent de l'API Beep qui se comporte différemment.

Dans ce cas pourquoi ne pas tester la valeur de retour de l'API ? Si Window.Beep retourne 0 alors il y a une erreur que l'on peut récupérer (et afficher) avec les API GetLastError et FormatMessage. Peut-être que l'erreur éventuelle t'indiqueras ce qui cloche.