CapJack a écrit:Oui, enfin.. encore faut-il avoir une carte son pouvant générer des ultra-sons, et surtout, des enceintes qui soient capables de les diffuser.
ditche a écrit:CapJack a écrit:Oui, enfin.. encore faut-il avoir une carte son pouvant générer des ultra-sons, et surtout, des enceintes qui soient capables de les diffuser.
Pas besoin de carte-son, ça sort via le haut parleur de l'unité centrale.
procedure TForm1.Button1Click(Sender: TObject);
var
son:integer;
duree:integer;
begin
son:=trackbar1.position;
duree:=(Spinedit1.value)*100;
Windows.Beep(son, duree)
end;
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
edit1.Text:=inttostr(trackbar1.position);
end;
Scaramanga a écrit:
Perso a partir de 12 000 Hertz, j'entend que dalle !
Retourner vers Le coin informatique
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 0 invités