Gambas France BETA


Pas de compte ? Incription

Ajouter des BEEP, dans vos Applications.

À propos de ce code

Bonjours @ Toutes & Tous.

Juste un petit plus pour le contrôle de vos Applications.
Émettre un Beep avec bip ou bip(1), plusieurs avec bip(x).

Il suffit d'ajouter la Fonction bip, à vos Applications,
et de Copier le Wav(réalisé avec Audacity), de l'Archive à la racine de votre Projet.
Détail du Wav:
Silence 250ms, Sinus 440Hz 250ms, Silence 250ms.
À noter, que l'on peut utiliser du Mp3, en lieu et place du Wav.
Pour ce faire, installer mpg321 via < synaptic > ou < apt-get install mpg321 >
et enfin dans les applications remplacer < aplay >, par < mpg321 >.

Reivillo.

Code source

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
PUBLIC SUB Form_Open()

bip

END

PUBLIC SUB bip(OPTIONAL $ibips AS INTEGER = 1)

DIM $iFor AS INTEGER

FOR $iFor = 0 TO $ibips - 1
SHELL "aplay " & Application.Path & "/250-440-250.wav 2>/dev/null"
SLEEP 0.5
NEXT

END

Commentaires

Commentaire de vuott, Le 19/9/2014 à 21:44:07
Hello Reivillo,

did you try to get a "beep" no using "Shell" and wav file ?


Cordialement.