Des exemples d'utilisation des fonctions du WLangage
Rien de tel qu'un exemple pour comprendre une fonction de WLangage. Dans cette section, vous trouverez des exemples simples.
Des exemples évolués, où la fonction est utilisée en contexte, sont également disponible sur ce site.
VideoAffiche (en anglais VideoDisplay)
// Affiche la séquence vidéo actuellement retransmise
// dans le champ "Webcaméra" ResFilm = VidéoAffiche (Webcaméra) SI ResFilm = Vrai ALORS // Affiche un libellé WebCaméra..Libellé = "En ce moment dans la cuisine" SINON Erreur(ErreurInfo()) FIN
|
VideoArrete (en anglais VideoStop)
// Arrête l'affichage de la séquence vidéo actuellement retransmise
// dans le champ Web Caméra "WebcameraCuisine" ResArrêt = VidéoArrête (WebcameraCuisine, viArrêteAffichage )
|
VideoCapture (en anglais VideoCapture)
// Sauvegarde de la vidéo retransmise dans le
// champ Web Caméra "WebcameraCuisine" // sous forme d'une AVI ("C:\Temp\MaVideo.AVI") // de 1 minute ResSauvegarde = VidéoCapture (WebcameraCuisine, ... "C:\Temp\MaVideo.AVI", ... viCaptureVidéo , 60) SI ResSauvegarde = Vrai ALORS Info("Vidéo correctement sauvegardée") SINON Erreur(ErreurInfo()) FIN
|
VideoChangeDriver (en anglais VideoSetDriver)
// Affiche la liste des drivers vidéo disponibles
// dans le champ ListeDriverVidéo ListeAjoute( ListeDriverVidéo , VidéoListeDriver ()) // Utilise le deuxième driver Vidéo SI VidéoChangeDriver ( ChampWeb1 , ListeDriverVidéo [ 2 ]) = Faux ALORS Erreur ( "Changement de driver impossible : " + RC + ... ErreurInfo ()) FIN
|
VideoConfigure (en anglais VideoConfigure)
// Affiche la boîte de dialogue standard
// permettant la configuration // du driver de capture vidéo // utilisé pour le champ "MaVidéo" VidéoConfigure (MaVidéo)
|
VideoConfigure (en anglais VideoConfigure)
VideoEtat (en anglais VideoStatus)
// Connaître l'état du champ Web Caméra "WebcameraCuisine"
// L'explication est affichée dans la barre de message. ResEtat = VidéoEtat (WebcameraCuisine) SELON ResEtat CAS viEtatAffichageCapture : Message("Affichage de la vidéo dans le champ Web Caméra. "+ ... "Sauvegarde en cours de cette vidéo") CAS viEtatAffichageSansCapture : Message("Affichage de la vidéo dans le champ Web Caméra. "+ ... "Aucune sauvegarde n'est actuellement réalisée") CAS viEtatCaptureSansAffichage : Message("Sauvegarde en cours d'une vidéo. "+ ... "Cette vidéo n'est pas affichée dans le champ Web Caméra") CAS viEtatSansCaptureSansAffichage : Message("Aucune vidéo n'est affichée et/ou en cours de "+ ... "sauvegarde dans le champ Web Caméra") FIN
|
VideoListeDriver (en anglais VideoListDriver)
// Connaître les drivers Vidéo installée
// Affichage dans la liste ListeDriver ListeAjoute(ListeDriver, VidéoListeDriver ())
|