pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

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.

Aller à la page des exemples évolués

TwainEtat (en anglais TwainState)

// Acquisition tant qu'il y a des pages dans le chargeur
NumPage est un entier = 1
BOUCLE
   TwainVersBMP("Fichier" + ...
       NumériqueVersChaine ( NumPage ) + ".bmp" , Faux )
   SI TwainEtat () = teNonChargé ALORS SORTIR
   NumPage ++
FIN


Début de la page

TwainHauteurSource (en anglais TwainSourceHeight)

// Affiche dans le champ HauteurScan la
// hauteur du document qui va être scanné
HauteurScan = TwainHauteurSource ()


Début de la page

TwainLargeurSource (en anglais TwainSourceWidth)

// Affiche dans le champ LargeurScan
// la largeur du document qui va être scanné

LargeurScan = TwainLargeurSource ()


Début de la page

TwainListeSource (en anglais TwainListSource)

// Affiche la liste des drivers des périphériques Twain
// du poste en cours dans le champ ListeDriverPériphérique

ListeAjoute(ListeDriverPériphérique, TwainListeSource ())


Début de la page

TwainSelectSource (en anglais TwainSelectSource)

// Affiche la boîte de dialogue standard listant les différents
// périphériques Twain disponibles sur le poste en cours
SI TwainSelectSource () = Faux ALORS
   Erreur("L'utilisateur n'a pas choisi de périphérique Twain")
FIN


Début de la page

TwainSourceEnCours (en anglais TwainCurrentSource)

// Périphérique Twain utilisé par défaut ?
Trace("Le périphérique utilisé par défaut est : "+ TwainSourceEnCours ())


Début de la page

TwainSourceEnCours (en anglais TwainCurrentSource)

// Changer le périphérique Twain utilisé par défaut
TwainSourceEnCours ("Logitech Camera")


Début de la page

TwainVersBMP (en anglais TwainToBMP)

// Enregistre le document présent dans le scanneur dans
// le fichier "MaPhoto.BMP"
// Le document sera enregistré en noir et blanc

SI TwainVersBMP ("C:\Temp\MaPhoto.BMP", Faux , TwainNoirBlanc ) ALORS
   Info("Le document a été enregistré")
SINON
   Erreur("Le document n'a pas été scanné")
FIN


Début de la page

TwainVersChamp (en anglais TwainToControl)

// Affiche l'image retransmise par la "web caméra" dans le champ "MonImage"
// L'image sera visualisée en noir et blanc

SI TwainVersChamp (MonImage, Faux , TwainNoirBlanc ) ALORS
   Info("L'image est affichée dans le champ image")
SINON
   Erreur("L'image n'a pas pu être récupérée")
FIN


Début de la page

TwainVersGif (en anglais TwainToGIF)

// Enregistre la 1° photographie sauvegardée dans l'appareil
// photographique numérique dans le fichier "MaPhoto.GIF"
// La photographie sera enregistrée en noir et blanc

SI TwainVersGIF ("C:\Temp\MaPhoto.GIF", 256, Faux , TwainNoirBlanc ) ALORS
   Info("La photographie a été enregistrée")
SINON
   Erreur("La photographie n'a pas pu être enregistrée")
FIN


Début de la page

TwainVersJPEG (en anglais TwainToJPEG)

// Enregistre le document présent dans le scanneur
// dans le fichier "MaPhoto.JPEG"
// Le document sera enregistré en noir et blanc

SI TwainVersJPEG ("C:\Temp\MaPhoto.JPEG", 0, Faux , TwainNoirBlanc ) ALORS
   Info("Le document a été enregistré")
SINON
   Erreur("Le document n'a pas été scanné")
FIN


Début de la page

TwainVersPressePapier (en anglais TwainToClipboard)

// Copie la 1ère photographie sauvegardée dans l'appareil
// photographique numérique dans le presse-papiers
// La photographie sera enregistrée en noir et blanc

SI TwainVersPressePapier ( Faux , TwainNoirBlanc ) ALORS
   Info("La photographie a été copiée vers le presse-papiers")
SINON
   Erreur("La photographie n'a pas pu être copiée")
FIN


Début de la page

TwainZoneScan (en anglais TwainScanZone)

// Définition de la zone à scanner
TwainZoneScan (0, 0, 150, 280)
// Affichage du document présent dans le scanneur dans le champ "MonImage"
// Seule la zone à scanner définie sera affichée
TwainVersChamp(MonImage, Faux )


Début de la page